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This international preliminary examination report has been prepared by this International Preliminary Examining Authority 
and is transmitted to the applicant according to Article 36. 



This REPORT consists of a total of 



. sheets, including this cover sheet. 



This report is also accompanied by ANNEXES, i.e., sheets of the description, claims and/or drawings which have been 
amended and are the basis for this report and/or sheets containing rectifications made before this Authority (see Rule 
70.16 and Section 607 of the Administrative Instructions under the PCT). 



These annexes consist of a total of _ 



sheets. 



This report contains indications relating to the following items: 
Basis of the report 
Priority 

Non-establishment of opinion with regard to novelty, inventive step and industrial applicability 
Lack of unity of invention 

Reasoned statement under Article 35(2) with regard to novelty, inventive step or industrial applicability; 
citations and explanations supporting such statement 

Certain documents cited 

Certain defects in the international application 

Certain observations on the international application 
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Form PCT/IPEA/409 (cover sheet) (July 1998) 



INTERNATIONAL PRELIMINARY EXAMINATION REPORT 



International application No. 

PCT/DE00/01001 



I. Basis of the report 



1. With regard to the elements of the international application:* 
[ | the international application as originally filed 
[)xj the description: 

pages . 1-83 > as originally filed 

p a g es , filed with the demand 
pages , filed with the letter of 

the claims: 

pages > as originally filed 

pages , as amended (together with any statement under Article 1 9 



pages 



filed with the demand 



pages M6 , filed with the letter of 020701 

the drawings: 



pages 



1/12-12/12 , as originally filed 



pages , filed with the demand 
pages , filed with the letter of . 

| | the sequence listing part of the description: 

pages , as originally filed 

pages • , filed with the demand 

pages , filed with the letter of 

2. With regard to the language, all the elements marked above were available or furnished to this Authority in the language in which 
the international application was filed, unless otherwise indicated under this item. 

These elements were available or furnished to this Authority in the following language which is: 

| | the language of a translation furnished for the purposes of international search (under Rule 23.1(b)). 
| 1 the language of publication of the international application (under Rule 48.3(b)). 

[ | the language of the translation furnished for the purposes of international preliminary examination (under Rule 55.2 and/ 
or 55.3). 

3. With regard to any nucleotide and/or amino acid sequence disclosed in the international application, the international 
preliminary examination was carried out on the basis of the sequence listing: 

| 1 contained in the international application in written form. 

1 1 filed together with the international application in computer readable form. 

I I furnished subsequently to this Authority in written form. 

I 1 furnished subsequently to this Authority in computer readable form. 

1 | The statement that the subsequently furnished written sequence listing does not go beyond the disclosure in the 
international application as filed has been furnished. 

1 1 The statement that the information recorded in computer readable form is identical to the written sequence listing has 
been furnished, 

4. 1 | The amendments have resulted in the cancellation of: 

1 1 the description, pages 

I 1 the claims, Nos. 

I 1 the drawings, sheets/fig 



I I This report has been established as if (some of) the amendments had not been made, since they have been considered to go 
" ' — ' beyond the disclosure as filed, as indicated in the Supplemental Box (Rule 70.2(c)).** 

* Replacement sheets which have been furnished to the receiving Office in response to an invitation under Article 14 are referred to 
in this report as "originally filed'* and are not annexed to this report since they do not contain amendments (Rule 70.16 
and 70.17). 

** Any replacement sheet containing such amendments must be referred to under item 1 and annexed to this report. 
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V. Reasoned statement under Article 35(2) with regard to novelty, inventive step or industrial applicability; 
citations and explanations supporting such statement 

1 . Statement 

Novelty (N) 

Inventive step (IS) 



Industrial applicability (IA) 



2. Citations and explanations 

Reference is made to the following documents: 

Dl: Leveson N. et al., "Safety Verification of ADA 

Programs using Software Fault Trees", IEEE Software, 
US, Vol. 8, No. 4, July 1991, pp. 48-59, mentioned 
in the application. 

D2: Vishnuvaj jala R. et al . , "Flow analysis for 
concurrent, reactive, real-time systems", 
Proceedings IEEE High-assurance engineering 
workshop, Canada, October 1996, pp. 176-183. 

Document Dl is considered the prior art closest to the 
subject matter of independent Claims 1, 8, 15 and 16. It 
discloses a method for detecting a total error description 
of at least one part of a computer program, said total 
error description being detected whilst taking into 
account a control flow description. 

The subject matter of Claim 1 and of Claims 8, 15 and 16 
which concord therewith differs from Dl in that a control 
flow description and a data flow description are merged 
into a common flow description, and that the total error 
description is detected from element error descriptions, 
Form PCT/IPEA/409 (Box V) (January 1994) 
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1-16 ves 



Claims NO 

1-16 YES 

Claims _ 

Claims NO 

Claims 1-16 VES 

Claims NO 
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wherein, in one structure of the total error description, 
a structure of the common flow description is taken into 
account - 

The problem addressed by the present invention can 
therefore be considered that of producing a method that 
enables the total error description of one part of a 
computer program to be more reliably detected. 

Although Dl contains isolated suggestions as to data 
errors, Dl does not contain any suggestion as to merging a 
control flow description and a data flow description into 
a common flow description. 

Although it describes separate control flow descriptions 
and data flow descriptions, D2 does not contain any 
suggestion as to simultaneously taking into account 
control flow influences and data flow influences when 
detecting a total error. 

Therefore, independent Claims 1, 8, 15 and 16 meet the 
requirements of novelty, inventive step and industrial 
applicability (PCT Article 33(2) to (4)). 

Claims 2-7 are dependent on Claim 1 and Claims 9-14 are 
dependent on Claim 8 and therefore likewise meet the 
requirements of novelty, inventive step and industrial 
applicability. 
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International application No. 
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VII. Certain defects in the international application 



The following defects in the form or contents of the international application have been 



The third document cited in the description, by 
Liggesmeyer, is an entire book of more than 300 pages. 
The applicant should have indicated in the description 
the passages that are important for the application. 

Contrary to PCT Rule 5.1(a) (iii), pages 3 to 5 of the 
description are not consistent with the claims. 

Pages 20 to 82 of the description only contains a 
computer program with which the method as per the 
embodiment is carried out. It is therefore not clear what 
is meant by the sentence on page 19, lines 26-28, because 
the description does not show any further alternatives or 
possible uses. 
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PCT 



MITTEILUNG UBER DIE UBERSENDUNG 
DES INTERNATIONALEN VORLAUFIGEN 
PRUFUNGSBERICHTS 

(Regel 71.1 PCT) 



Absendedatum 
(T ag/Monat/Jahr) 



12.09.2001 



Aktenzerchen des Anmelders Oder Anwalts 
199P01974WO 


WICKHGE MITTBLUNG 


Intelftationales Aktenzeichen 
PCT/DEOO/01001 


Internationales Anmeldedatum (Tag/Monat/Jahr) 
03/04/2000 


Prioritatsdatum (Tag/Monat/Jahr) 
02/06/1999 


Anmelder 

SIEMENS AKTIENGESELLSCHAFT 



1. Dem Anmelder wird mitgeteilt, da3 ihm die mit der internationalen vorlaufigen Prufung beauftragte Behorde 
hiermit den zu der internationalen Anmeldung erstellten internationalen vorlaufigen Prufungsbericht; 
gegebenenfalls mit den dazugehorigen Anlagen, ubermittelt. 

2. Eine Kopie des Berichts wird - gegebenenfalls mit den dazugehorigen Anlagen - dem Internationalen Buro zur 
Weiterleitung an alle ausgewahlten Amter ubermittelt. 

3. Auf Wunsch eines ausgewahlten Amts wird das Internationale Buro eine Ubersetzung des Berichts (jedoch 
nicht der Anlagen) ins Englische anfertigen und diesem Amt ubermitteln. 

4. ERINNERUNG 

Zum Eintritt in die nationale Phase hat der Anmelder vor jedem ausgewahlten Amt innerhalb von 30 Monaten 
ab dem Prioritatsdatum (oder in manchen Amtern noch spater) bestimmte Handlungen (Einreichung von 
Ubersetzungen und Entrichtung nationaler Gebuhren) vorzunehmen (Artikel 39 (1)) (siehe auch die durch das 
Internationale Buro im Formblatt PCT/IB/301 ubermittelte Information). 



1st einem ausgewahlten Amt eine Ubersetzung der internationalen Anmeldung zu ubermitteln, so muf3 diese 
Ubersetzung auch Ubersetzungen aller Anlagen zum internationalen vorlaufigen Prufungsbericht enthalten. Es 
ist Aufgabe des Anmelders, solche Ubersetzungen anzufertigen und den betroffenen ausgewahlten Amtern 
direkt zuzuleiten. 



Weitere Einzelheiten zu den maBgebenden Fristen und Erfordernissen der ausgewahlten Amter sind Band II 
des PCT-Leitfadens fur Anmelder zu entnehmen. 



Name und Postanschrift der mit der internationalen Prufung 
beauftragten Behorde 


Bevollmachtigter Bediensteter 




Europaisches Patentamt - P.B. 5818 Patentlaan 2 


Cardenas, C 




JSfi NL-2280 HV Rijswijk - Pays Bas 
ig/' Tel. +31 70 340 - 2040 Tx: 31 651 epo nl 






Fax: +31 70 340-3016 


Tel. +31 70 340-3370 



Formblatt PCT/IPEA/416 (Juli 1992) 



VERTRAG UBER DIE INTERNATIONALE ZUSAMMEN ARBEIT AUF DEM 

GEBIET DES PATENTWESENS 



PCT 

INTERNATIONAL^ VORLAUFIGER PRUFUNGSBERICHT 

(Artikel 36 und Regel 70 PCT) 



Aktenzeichen des Anmelders Oder Anwalts 
199P01974WO 


siehe Mitteiiung Qber die Ubersendung des internationalen 
WEITERES VORGEHEN voriaufigen Prufungsberichts (Formblatt PCT/IPEA/416) 


Internationales Aktenzeichen 
PCT/DE00/01001 


Internationales Anmeldedatum (Tag/Monat/Jahr) 
03/04/2000 


Prioritatsdatum (T ag/Monat/T ag) 
02/06/1999 


Internationale Patentklassifikation (IPK) Oder nationale Klassifikation und IPK 
G06F11/00 


Anmelder 






SIEMENS AKTIENGESELLSCHAFT 





1 Dieser internationale vorlaufige Prufungsbericht wurde von der mit der internationalen voriaufigen Prufung beauftragten 
Behorde erstellt und wird dem Anmelder gemaB Artikel 36 ubermittelt. 



2. Dieser BERICHT umfaBt insgesamt 5 Blatter einschlieBlich dieses Deckblatts. 

B AuBerdem liegen dem Bericht ANLAGEN bei; dabei handelt es sich urn Blatter mit Beschreibungen, Anspmchen 
und/oder Zeichnungen, die geandert wurden und diesem Bericht zugrunde liegen, und/oder Blatter mit vor dieser 
Behorde vorgenommenen Berichtigungen (siehe Regel 70.16 und Abschnitt 607 der Verwaltungsrichtlinien zum PCT). 

Diese Anlagen umfassen insgesamt 5 Blatter. 



3. Dieser Bericht enthalt Angaben zu folgenden Punkten: 



I 


£3 


II 


□ 


III 


□ 


IV 


□ 


V 




VI 


□ 


VII 




VIII 


□ 



Grundlage des Berichts 
Prioritat 

Keine Erstellung eines Gutachtens uber Neuheit, erfinderische Tatigkeit und gewerbliche Anwendbarkeit 
Mangelnde Einheitiichkeit der Erfindung 

Begrundete Feststellung nach Artikel 35(2) hinsichtltch der Neuheit, der erfinderischen Tatigkeit und der 
gewerblichen Anwendbarkeit; Unterlagen und Erklarungen zur Stutzung dieser Feststellung 

Bestimmte angefuhrte Unterlagen 

Bestimmte Mangel der internationalen Anmeldung 

Bestimmte Bemerkungen zur internationalen Anmeldung 



Datum der Einreichung des Antrags 



29/08/2000 



Datum der Fertigstellung dieses Berichts 



12.09.2001 



Name und Postanschrift der mit der internationalen voriaufigen 
Prufung beauftragten Behorde: 

Europaisches Patentamt - P.B. 5818 Patentlaan 2 

NL-2280 HV Rijswijk - Pays Bas 
Tel. +31 70 340 - 2040 Tx: 31 651 epo nl 

Fax: +31 70 340-3016 



Bevollmachtigter Bediensteter 
Herreman, G 

Tel. Nr. +31 70 340 3073 
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INTERNATIONALER VORLAUFIGER 
PRUFUNGSBERICHT 



Internationales Aktenzeichen PCT/DE00/01 001 



I. Grundlage des B richts 

1. Hinsichtlich der B standteile der internationalen Anmeldung {Ersatzblatter, die dem Anmeldeamt auf eine 
Aufforderung nach Artikel 14 hin vorgelegt warden, gelten im Rahmen dieses Berichts als "ursprunglich 
eingereicht" und sind ihm nicht beigefugt, weii sie keine Anderungen enthalten (Regein 70. 16 und 70.17)): 
Beschreibung, Seiten: 

1 -83 ursprungliche Fassung 

Patentanspruche, Nr.: 

1 _i 6 eingegangen am 02/07/2001 mit Schreiben vom 29/06/2001 

Zeichnungen, Blatter: 

1/1 2-1 2/1 2 ursprungliche Fassung 



2. Hinsichtlich der Sprache: Alle vorstehend genannten Bestandteile standen der Behorde in der Sprache, in der 
die internationale Anmeldung eingereicht worden ist, zur Verfugung Oder wurden in dieser eingereicht, sofern 
unter diesem Punkt nichts anderes angegeben ist. 

Die Bestandteile standen der Behorde in der Sprache: zur Verfugung bzw. wurden in dieser Sprache 
eingereicht; dabei handelt es sich urn 

□ die Sprache der Ubersetzung, die fur die Zwecke der internationalen Recherche eingereicht worden ist (nach 
Regel 23.1(b)). 

□ die Veroffentlichungssprache der internationalen Anmeldung (nach Regel 48.3(b)). 

□ die Sprache der Ubersetzung, die fur die Zwecke der internationalen vorlaufigen Prufung eingereicht worden 
ist (nach Regel 55.2 und/oder 55.3). 

3. Hinsichtlich der in der internationalen Anmeldung offenbarten Nucleotid- und/oder Aminosauresequenz ist die 
internationale vorlaufige Prufung auf der Grundlage des Sequenzprotokolls durchgefuhrt worden, das: 

□ in der internationalen Anmeldung in schriftlicher Form enthalten ist. 

□ zusammen mit der internationalen Anmeldung in computerlesbarer Form eingereicht worden ist. 

□ bei der Behorde nachtraglich in schriftlicher Form eingereicht worden ist. 

□ bei der Behorde nachtraglich in computerlesbarer Form eingereicht worden ist. 

□ Die Erklarung, daB das nachtraglich eingereichte schriftliche Sequenzprotokoll nicht uber den 
Offenbarungsgehalt der internationalen Anmeldung im Anmeldezeitpunkt hinausgeht, wurde vorgelegt. 

□ Die Erklarung, daB die in computerlesbarer Form erfassten Informationen dem schriftlichen 
Sequenzprotokoll entsprechen, wurde vorgelegt. 

4. Aufgrund der Anderungen sind folgende Unterlagen fortgefallen: 
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Internationales Aktenzeichen PCT/DE00/01 001 



□ Beschreibung, Seiten: 

□ Anspruche, Nr.: 

□ Zeichnungen, Blatt: 

5. □ Dieser Bericht ist ohne Berucksichtigung (von einigen) der Anderungen erstellt worden, da diese aus den 

angegebenen Grunden nach Auffassung der Behdrde uber den Offenbarungsgehalt in der ursprunglich 
eingereichten Fassung hinausgehen (Regel 70.2(c)). 

(Auf Ersatzblatter, die solche Anderungen enthalten, ist unter Punkt 1 hinzuweisen;sie sind diesem Bericht 
beizufugen). 

6. Etwaige zusatzliche Bemerkungen: 

V. Begrundete Feststellung nach Artikel 35(2) hinsichtlich der Neuheit, der erfinderischen Tatigkeit und der 
gewerblichen Anwendbarkeit; Unterlagen und Erklarungen zur Stiitzung dieser Feststellung 

1. Feststellung 

Neuheit (N) Ja: Anspruche 1-16 

Nein: Anspruche 

Erf inderische Tatigkeit (ET) Ja: Anspruche 1-16 

Nein: Anspruche 

Gewerbliche Anwendbarkeit (GA) Ja: Anspruche 1 -1 6 

Nein: Anspruche 

2. Unterlagen und Erklarungen 
siehe Beiblatt 

VII. Bestimmte Mangel der internationalen Anmeldung 

Es wurde festgestellt, daB die internationale Anmeldung nach Form oder Inhalt folgende Mangel aufweist: 
siehe Beiblatt 
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INTERNATIONALER VORLAUFIGER Internationales Aktenzeichen PCT/DE00/01 001 
PRUFUNGSBER1CHT - BEIBLATT 



Zu Punkt V 

Begrundete Feststellung nach Artik I 35(2) hinsichtlich d r N uh it, d r 
erfinderischen Tatigkeit und der gewerblichen Anwendbarkeit; Unterlagen und 
Erklarungen zur Stutzung dieser Feststellung 

Es wird auf die folgenden Dokumente verwiesen: 

D1 : Leveson N. et al., "Safety Verification of ADA Programs using Software Fault Trees", 
IEEE Software, US, Bd. 8, Nr. 4, Juli 1991, S. 48-59, in der Anmeldung erwahnt. 

D2: Vishnuvajjala R. et al., "Flow analysis for concurrent, reactive, real-time systems", 
Proceedings IEEE High-assurance systems engineering workshop, Canada, Oktober 
1996, S. 176-183. 

Das Dokument D1 wird als nachstliegender Stand der Technik gegenuber dem 
Gegenstand der unabhangigen Anspruche 1, 8, 15, 16 angesehen. Es offenbart ein 
Verfahren zur Ermittlung einer Gesamtfehlerbeschreibung zumindest eines Teils eines 
Computerprogramms, wobei die Gesamtfehlerbeschreibung unter Berucksichtigung einer 
KontrollfluBbeschreibung ermittelt wird. 

Der Gegenstand des Anspruchs 1 und der damit ubereinstimmenden Anspruche 8, 15 und 
16 unterscheidet sich dadurch von D1, daB eine KontrollfluBbeschreibung und eine 
DatenfluBbeschreibung zu einer gemeinsamen FluBbeschreibung zusammengefaBt 
werden, sowie daB die Gesamtfehlerbeschreibung aus Elementenfehlerbeschreibungen 
ermittelt wird, wobei in einer Struktur der Gesamtfehlerbeschreibung eine Struktur der 
gemeinsamen FluBbeschreibung berucksichtigt wird. 

Die mit der vorliegenden Erfindung zu losende Aufgabe kann somit darin gesehen werden 
ein Verfahren zu schaffen urn eine zuverlassigere Gesamtfehlerbeschreibung eines Teils 
eines Computerprogramms zu ermitteln. 

Obwohl D1 isolierte Hinweise auf Datenfehler enthalt, erhalt man aus D1 keine Hinweise 
auf eine Zusammenfassung einer KontrollfluBbeschreibung und einer DatenfluB- 
beschreibung zu einer gemeinsamen FluBbeschreibung. 



Formblatt PCT/Beiblatt/409 (Blatt 1) (EPA-April 1997) 



INTERNATIONALER VORLAUFIGER 
PRUFUNGSBERICHT - BEIBLATT 



Internationales Aktenzeichen PCT/DE00/01 001 



Auch aus D2, obwohl es getrennt KontrollfluBbeschreibungen und DatenfluB- 
beschreibungen nennt, erhalt man keine Hinweise auf eine gleichzeitige Berucksichtigung 
von KontrollfluBfehlereinflussen zusammen mit DatenfluBfehlereinflussen bei der 
Ermittlung eines Gesamtfehlers. 

Deshalb erfullen die unabhangigen Anspruche 1, 8, 15, 16 die Erfordernisse hinsichtlich 
der Neuheit, der erfinderischen Tatigkeit und der gewerblichen Anwendbarkeit nach Artikel 
33(2) bis (4) PCT. 

Die Anspruche 2-7 sind vom Anspruch 1 abhangig und die Anspruche 9-14 sind vom 
Anspruch 8 abhangig und erfullen damit ebenfalls die Erfordernisse des PCT bezuglich 
Neuheit, erfinderischen Tatigkeit und gewerblichen Anwendbarkeit. 

Zu Punkt VII 

Bestimmte Mangel der internationalen Anmeldung 

Das dritte in der Beschreibung genannte Dokument von Liggesmeyer ist ein ganzes Buch 
von mehr als 300 Seiten. Die Anmelderin hatte die fur die Anmeldung wichtigen Passagen 
in der Beschreibung nennen mussen. 

Die Beschreibung auf Seiten 3 bis 5 steht nicht, wie in Regel 5.1 a) iii) PCT vor- 
geschrieben, in Einklang mit den Anspruchen. 

Die Beschreibung beinhaltet ab S. 20 bis S. 82 nur ein Computerprogramm, mit dem das 
Verfahren gemaB dem Ausfuhrungsbeispiel realisiert ist. Es ist deshalb nicht klar, was mit 
dem Satz auf S. 19, Z. 26-28 gemeint ist, weil die Beschreibung keine weiteren 
Alternativen oder Anwendungsmoglichkeiten darstellt. 
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Patentanspruche 



1. Verfahren .zur Ermittlung einer Gesanrtf ehlerbeschreibung 
zuinindest eines Teils eines Computerprogramms, durch einen 

5 Computer, 

• bei dem zumindest der Teil des Computerprogramms gespei- 
chert ist, 

• bei dem eine Kontrollf lufibeschreibung fiir den Teil des Com- 
puterprogramms, welche einen Flufi von Kontrollinf ormationen 

10 in dem Teil des Computerprograms beschreibt, und eine Da- 
tenf lufibeschreibung fiir den Teil des Computerprogramms, 
welche einen Flufi von Daten in dem Teil des Compu- 
terprograms beschreibt, ermittelt und in eine gemeinsame 
Flufibeschreibung fur den Teil des Computerprogamms zusam- 

15 mengefafit werden, 

• bei dem Programmelemente aus dem Teil des Computerprogramms 
ausgewahlt werden, 

• bei dem ftir jedes ausgewahlte Programmelement unter Verwen- 
dung einer gespeicherten Fehlerbeschreibung, die jeweils 

20 einem Ref erenzelement zugeordnet ist, eine Elementenf ehler- 
beschreibung ermittelt wird, mit der mogliche Fehler des 
jeweiligen Programmelements beschrieben werden, 

• bei dem mit einer Fehlerbeschreibung eines Ref erenzelements 
mogliche Fehler des jeweiligen Ref erenzelements beschrieben 

25 werden, und 

• bei dem aus den Elementenf ehlerbeschreibungen die Gesamt- 
fehlerbeschreibung ermittelt wird, wobei in einer Struktur 
der Gesamtf ehlerbeschreibung eine Struktur der gemeinsamen 
Flufibeschreibung berucksichtigt wird. 

30 

2, Verfahren nach Anspruch 1, 

bei dem die Kontrollf lufibeschreibung in Form eines Kon- 
trollf lufigraphen vorliegt. 

35 3. Verfahren nach Anspruch 1 Oder 2, 

bei dem die Datenf lufibeschreibung in Form eines Da- 
tenf lufigraphen vorliegt. 
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4. Verfahren nach einem der vorangegangenen Anspriache, 

bei dem die Fehlerbeschreibung in Form eines gespeicherten 
Fehlerbaums vorliegt, 
5 • bei dem die Elementenf ehlerbeschreibung als Elementenf eh- 
lerbaum ermittelt wird, und 

• bei dem die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum 
ermittelt wird. 

10 5. Verfahren nach einem der vorangegangenen Ansprttche, 

eingesetzt zur Fehleranalyse des Teils des Computerprogramms . 

6. Verfahren nach einem der vorangegangenen Anspriiche, 

• bei dem die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum 
15 ermittelt wird, 

• bei dem der Gesamtf ehlerbaum verandert wird hinsichtlich 
vorgebbarer Rahmenbedingungen. 

7. Verfahren nach Anspruch 6, 

20 bei dem die Veranderung durch Hinzufugen eines Erganzungsf eh- 
lerbaums erfolgt. 

8. Anordnung zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogramms, durch einen 

25 Computer, 

mit einem Prozessor, der derart eingerichtet ist, dafi folgen- 
de Schritte durchfuhrbar sind: 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• es wird eine Kontrollf lufibeschreibung fur den Teil des Com- 
30 puterprogramms, welche einen Flufi von Kontrollinf ormationen 

in dem Teil des Computerprograms beschreibt, ermittelt und 
es wird eine Datenf luftbeschreibung fur den Teil des Compu- 
terprogramms, welche einen FluJi von Daten in dem Teil des 
Computerprograms beschreibt, ermittelt und es werden die 
35 Kontrollf luflbeschreibung und die Datenf lufibeschreibung in 

eine gemeinsame Flulibeschreibung fiir den Teil des Compu- 
terprogamms zusammengef afit , 
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Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt , 

• fur jedes ausgewahlte Programmelement wird unter Verwendung 
einer gespeicherten Fehlerbeschreibung, die jeweils einem 
Ref erenzelement zugeordnet ist, eine Elementenf ehler- 
beschreibung ermittelt, mit der mogliche Fehler des jewei- 
ligen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 

• aus den Elementenf ehlerbeschreibungen wird die Gesamt- 

f ehlerbeschreibung ermittelt, wobei in einer Struktur der 
Gesamtf ehlerbeschreibung eine Struktur der gemeinsamen 
Flufibeschreibung berUcksichtigt wird. 

9. Anordnung nach Anspruch 8, 

bei der der Prozessor derart eingerichtet ist, daii die Kon- 
trollf lufibeschreibung in Form eines Kontrollf lufigraphen vor- 
liegt . 

10. Anordnung nach Anspruch 8 oder 9, 

bei der der Prozessor derart eingerichtet ist, dafi die Da- 
tenf luflbeschreibung in Form eines Datenf luiigraphen vorliegt. 

11. Anordnung nach 'einem der Anspruche 8 bis 10, 
bei der der Prozessor derart eingerichtet ist, dafi 

• die Fehlerbeschreibung in Form eines gespeicherten Fehler- 
baums vorliegt, 

• die Elementenf ehlerbeschreibung als Elementenf ehlerbaum er- 
mittelt wird, und 

• die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum ermittelt 
wird . 

12. Anordnung nach einem der Anspruche 8 bis 11, 
eingesetzt zur Fehleranalyse des Teils des Computerprogramms. 

13. Anordnung nach einem der Anspruche 8 bis 12, 
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bei der der Prozessor derart eingerichtet ist, dafi 

• die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum ermittelt 
wird, 

• der Gesamtf ehlerbaum verandert wird hinsichtlich vorgebba- 
5 rer Rahmenbedingungen . 

14. Anordnung nach Anspruch 13, 

bei der der Prozessor derart eingerichtet ist, dafi die Veran- 
derung durch Hinzufligen eines Erganzungsf ehlerbaums erf olgt . 

10 

15. Computerprogramm-Erzeugnis, das ein computerlesbares 
Speichermedium umfafit, auf dem ein Programm gespeichert ist, 
das es einem Computer ermoglicht, nachdem es in einen Spei- 
cher des Computers geladen worden ist, folgende Schritte 

15 durchzufuhren zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogramms : 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• es wird eine Kontrollf lufibeschreibung ftir den Teil des Com- 
puterprogramms, welche eine Flufi von Kontrollinf ormationen 

20 in dem Teil des Computerprograms beschreibt, ermittelt und 
es wird eine Datenf lufibeschreibung fur den Teil des Compu- 
terprogramms, welche einen Flufi von Daten in dem Teil des 
Computerprograms beschreibt, ermittelt und es werden die 
Kontrollf lufibeschreibung und die Datenf lufibeschreibung in 

25 eine gemeinsame Flufibeschreibung filr den Teil des Compu- 

terprogamms zusammengef afit, 

• Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt , 

• filr jedes ausgewahlte Programmelement wird unter Verwendung 
30 einer gespeicherten Fehlerbeschreibung, die jeweils einem 

Ref erenzelement zugeordnet ist, eine Elementenf ehler- 
beschreibung ermittelt, mit der mogliche Fehler des jewei- 
ligen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
35 mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 
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aus den Elementenf ehlerbeschreibungen wird^i^ f GesamtA 
fehlerbeschreibung ermittelt, wobei in einft Struktur jder 
Gesamtfehlerbeschreibung eine Struktur der |femeins^h 
FluJibeschreibung berucksichtigt wird. ~'-' t 

16. Computerlesbares Speichermedium, auf dem ein Program ge- 
speichert ist, das es einem Computer ermoglicht, nachdem es 
in einen Speicher des Computers geladen worden ist, folgende 
Schritte durchzuf iihren zur Ermittlung einer Gesamtfehlerbe- 
schreibung zumindest eines Teils eines Computerprogramms : 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• es wird eine Kontrollf lullbeschreibung fur den Teil des Com- 
puterprogramms, welche eine FluA von Kontrollinf ormationen 
in dem Teil des Computerprograms beschreibt, ermittelt und 
es wird eine Datenf luJlbeschreibung fur den Teil des Compu- 
terprogramms, welche einen FluJl von Daten in dem Teil des 
Computerprograms beschreibt, ermittelt und es werden die 
Kontrollf lullbeschreibung und die Datenf lullbeschreibung in 
eine gemeinsame FluJibeschreibung fur den Teil des Compu- 
terprogamms zusammengef aJlt , 

• Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt , 

• fiir jedes ausgewahlte Programmelement wird unter Verwendung 
einer gespeicherten Fehlerbeschreibung, die jeweils einem 
Ref erenzelement zugeordnet ist, eine Elementenf ehler- 
beschreibung ermittelt, mit der mogliche Fehler des jewei- 
ligen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 

• aus den Elementenf ehlerbeschreibungen wird die Gesamt- 
fehlerbeschreibung ermittelt,- wobei in einer Struktur der 
Gesamtfehlerbeschreibung eine Struktur der gemeinsamen 
FluJibeschreibung berucksichtigt wird. 
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VERTRAG UBER DIE INTERNATIONALE ZUSAMMEN ARBEIT 
AUF DEM GEBIET DES PATENTWESENS 



Absender: INTERNATIONALE RECHERCHENBEHORDE 



An 



SIEMENS AKTIENGESELLSCHAFT 
Postfach 22 16 34 
D-80506 Munchen 
GERMANY 



ZT GG VM Mch P/Ri 



Eing. 2 5. Aug. 2000 



GR 
Frist 



PCT 



M1TTEILUNG UBER DIE UBERMITTLUNG DES 
INTERNATIONALEN RECHERCHENBERICHTS 
ODER DER ERKLARUNG 




Absendedatum 
(T ag/Monat/Jahr) 



(Regel 44.1 PCT\ . 



28/08/2000 



Aktenzeichen des Anmelders Oder Anwalts 

99P1974P 



WEITERES VORGEHEN 



siehe Punkte 1 und 4 unten 



Internationales Aktenzeichen 

PCT/DE 00/01001 



Internationales Anmeldedatum 
(TagMonat/Jahr) Q3/04/2000 



Anmelder 

SIEMENS AKTIENGESELLSCHAFT 



1 • E Dem Anrne lder wird mitgeteilt, daG der internationale Recherchenbericht erstellt wurde und ihm hiermit ubermittelt wird. 
Einreichung von Anderungen und einer Erklarung nach Artikel 19: 

Der Anmelder kann auf eigenen Wunsch die Anspruche der internationalen Anmeldung andern (siehe Regel 46): 
Bis wann sind Anderungen einzureichen? 

Die Frist zur Einreichung solcher Anderungen betragt ublicherweise zwei Monate ab der Ubermittlung des 
internationalen Recherchenberichts; weitere Einzelheiten sind den Anmerkungen auf dem Beiblatt zu entnehmen. 

Wo sind Anderungen einzureichen? 

Unmittelbar beim Internationalen Buro der WIPO, 34. CHEMIN des Colombettes, CH-121 1 Gent 20 
Telefaxnr.: (41-22) 740.14.35 

Nahere Hinweise sind den Anmerkungen auf dem Beiblatt zu entnehmen. 

2 - O Dem Anme| der wird mitgeteilt, daG kein international Recherchenbericht erstelft wird und daG ihm hiermit die Erklaruna nach 
Artikel 17(2)a) ubermittelt wird. 



3. 



I I Hinsichtlich des Widerspruchs gegen die Entrichtung einer zusatzlichen Gebiihr (zusatzlicher Gebiihren) nach Reqel 40 2 wird 
1 — 1 dem Anmelder mitgeteilt, daG 

| | der Widerspruch und die Entscheidung hieruber zusammen mit seinem Antrag auf ObermittJung des Wortlauts sowohl des 
— Widerspruchs als auch der Entscheidung hieruber an die Bestimmungsamter dem Internationalen Buro ubermittelt worden 
sind. 

I I noch keine Entscheidung Ciber den Widerspruch vorliegt; der Anmelder wird benachrichtigt, sobald eine Entscheiduna 
1 — 1 getroffen wurde. a 

Weiteres Vorgehen: Der Anmelder wird auf folgendes aufmerksam gemacht: 

Kurz nach Ablauf von 18 Monaten seit dem Prioritatsdatum wird die internationale Anmeldung vom Internationalen Buro ver6ffent- 
WH^der Anmelder die Veroffentlichung verhindern Oder auf einen spateren Zeitpunkt verschieben, so muG gema(3 Regel 90 1 
bzw. 9(T .3 vor AbschtuR der technischen Vorbereitungen fur die internationale Veroffentlichung eine Erklarung iiber die Zurucknah- 
me der internationalen Anmeldung Oder des Prioritatsanspruchs beim Internationalen Buro eingehen. 

Innerhalb von 19 Monaten seit dem Prioritatsdatum istein Antrag auf internationale vortaufige Priifung einzureichen wenn der 
Anmelder den Eintritt in die nationale Phase bis zu 30 Monaten seit dem Prioritatsdatum (in manchen Amtern sogar noch langer) 
verschieben mochte. ' 

Innerhalb von 20 Monaten seit dem Prioritatsdatum mu& der Anmelder die fur den Eintritt in die nationale Phase vorgeschriebenen 
Handlungen vor alien Bestimmungsamtern vornehmen. die nicht innerhalb von 19 Monaten seit dem Prioritatsdatum in der 
Anmeldung Oder einer nachtraglichen Auswahlerklarung ausgewarilt wurden Oder nicht ausgewShlt werden konnten da fur sie 
Kapitel tl des Vertrages nicht verbindlich ist. 



Name und Postanschrift der Internationalen Recherchenbehdrde 

Europaisches Patentamt, P.B. 5818 Patentlaan 2 
NL *2280 HV Rijswijk 
SDtt Tel. (+31-70) 340-2040, Tx. 31 651 epo nl. 
Fax: (+31-70) 340-3016 



BevollmSchtigter Bediensteter 

Lucia Van Pinxteren 



Formblatt PCT/ISA/220 (Juli 1998) 



(Siehe Anmerkungen auf Beiblatt) 



ANMERKUNGEN ZU FORMBLATT PCT/ISA/220 



Dtese Anmerkungen sollen grundlegende Hinweise zur Einreiehung von Anderungen gemafl Artikel 1 9 geben. Diesen Anmorkungen 
liegen die Erfordernisse des Vertrags Ober die international© Zusammenarbeit auf dem Gebtet des Patentwesens (PCT) der Ausfuhnjnas- 
ordnung und der VerwaltungsrichUinien zu diesem Vertrag zugrunde. Bei Abweichungen zwischen ciesen Anmerkungen und 

?*^? enannten J oxlen sind ,otztere ™Bgebend. Nahere Einzelheiten sind dem PCT-Leitfaden fur Anmelder, einer Veroffenttichuno der 
WIPO, zu entnehmen. 

Die in diesen Anmerkungen verwendeten Begriffe 'Artiker, 'RegeC und "Abschnrtf beziehen sich jeweils auf die Besttmmunoen des 
PCT-Vertrags, der PCT-Auafuhrungsordnung bzw der PCT-Verwaltungsrichttinien. 

hinweise zu Anderungen gemAss artikel is 

Nach Erhatt dea intemationaJen Recherchenbenchts hat der Anmelder die Moglichkert, einmal die Anspruohe der intemaiionalen 
^meldung zu anctenr Es mi jedoch zu betonen, daB t da alle Teile der intemaiionalen Anmeldung (Anapruche, Beschreibuno und 
^<^nunaen) wan rend des mtemabonaten vorlaufigen Prufungsverfahrens geandert werden konnen, normalerweise keine Notwendtokeit 
^• W « / ^" 9 ^ r u An8 P^ cho nach Mik * 19 einzureichen, auBer wenn der Anmelder z.B. zum Zwecke einee von^figeT^ 9 
22 0? If i??!! An *1* uch * wOnacht Oder ein anderer Grund fQr eine Anderung der Anapruche vor ihrer Sttemabona- 

len Veroffentl.chung vorliegt. Weiterh.n tst zu beachten, daB ein vorlaufiger Schutz nur in etnigen SI a at on erhaJMich mi 

Welche Telle der Intern atlonalen Anmeldung konnen geandert werden? 

Im Rahmen von Artikel 19 konnen nur die Anapruche geandert werden. 

Jra^"^^ , Ara ^^^^ch A^, 34 vorder mit international vorlaufigen Prufung beauf- 

^^*^** n ( ,° der "HZ*?* werden. Die Beachreibung und die Zeichnungen konnen nur nach Artikel 34 

vor der mrt der intemabonalen vorlaufigen Prufung beauftragten Behorde geandert werden. 



Beim Eirrtritt in die nationaJe Pha 
41 geandert werden. 



>e kdnnen alle Teile der inter nationalen Anmeldung nach Artikel 28 oder gegebenenfalls Artikel 



Ble wann slnd Anderungen elnzurelchen? 

see * 

Wo slnd die Anderungen nlcht einaireichen? 

e^flK^^ IntemationaJen Buro, nicht aber beim Anmeldeamt oder der International Recherchenbehdrde 

Falls ein Antrag auf intemationale vorlaufige Prufung etngereicht wurde/wird, siehe unten. 

In weicher Form kdnnen Anderungen erfolgen? 

ne^er^o^che^ °^ flan2er ^lurch HinzufOgung eines oder menrerer 

neuer Anapruche oder durch Anderung des Wortlauts eines oder mehrerer Anspruohe in der eingereichten Fasaung. 

u£e^& meh — Anderungen von dem ureprOnglich eingereicnten Blatt 

^^r^n^^r 1 "^!!^^ GfSchGinen ' sind mrt a^abischen Ziffem zu numeneren. Wird ein Anapruch gestrichen so 
n^^e^ Fa,l einer Neunumeherung s.nd *e An^E5£& " 

Die Anderungen slnd In der Sprache abzufassen, In der dlelntematlonale Anmeldung verdffentJIcht wird. 

Wei che Unterlagen slnd den Anderungen beizufQgen? 
Beg lefts chrei ben (Abschnltt 205 b)): 

Die Anderungen sind mit einem Begfeftschreiben einzureichen. 



Anmerkungen zu Formblatt PCT/ISA/220 (Blatt 1 ) (Januar 1994) 



BNSDOCID: <XSISA220NODEP4J_> 



ANMERKUNGEN ZU FORMBLATT PCT/ISA/220 (F lis tzung) 



lm Begleitschreiben sind die Unterschiede zwischen den AnsprOchen in der eingereichten Fassung und den geanderten AnsprOchen 
anzugeben. So ist insbesondere zu jedem Anspruch in der intemaiionalen Anmeldung anzugeben (gfeichlautende Angaben zu 
verschiedenen AnsprOchen konnen zusammengefaBt werden), ob 

i) der Anspruch unverandert ist; 

ii) der Anspruch gestrichen worden ist; 

iii) der Anspruch neu ist; 

iv) der Anspruch einen oder mehrere AnsprQche in der eingereichten Fassung ersetzt; 

v) der Anspruch auf die Teilung eines Anspruchs in der eingereichten Fassung zurQokzufOhren ist. 



im folgenden sind Belsplete angegeben, wle Anderungen lm Begtelts?hrelben zu ertfutern sind: 

1 . [Wenn anstelle von ursprOnglich 48 AnsprOchen nach der Anderung einiger AnsprQche 51 AnsprQche existieren] 
"^! e ^ mp !^ e 1 * 8 291 31 ' 32 ' M > 35, 37 bis 48 werden durch geanderte AnsprQche gleicher Numenerung ersetzt: AnsprQche 
30, 33 und 36 unverandert; neue AnsprQche 49 bis 51 hinzugefugf W ' ^ 

2. (Wenn anstelle von ursprGngHch 1 5 AnsprOchen nach der Anderung alter AnsprQche 1 1 AnsprQche existieren] * 
'Geanderte AnsprQche 1 bis 1 1 treten an die Stelle der AnsprQche 1 bis 1 5/ 

3. fWenn ursprOnglich 1 4 AnsprQche existierten und die Anderungen darin bestehen, daG einige AnsprQche gestrichen werden und 
neue AnsprQche hinzugefQgt werden]: 

AnsprQche 1 bis 6 und 1 4 unverandert; AnsprQche 7 bis 13 gestrichen; neue AnsprQche 15, 16 und 17 hinzugefQgt -Oder* An- 
sprQche 7 bts 13 gestrichen; neue AnsprQche 15, 16 und 17 hinzugefQgt; alle Obrigen AnsprQche unverandert." 

4. [Wenn verschiedene Art en von Anderungen durchgefQhrt werden] 

•AnsprQche 1 -10 unverandert; AnsprQche 1 1 bis 13, 18 und 19 gestrichen; AnsprQche 1 4, 1 5 und 16 durch geanderten An- 
spruch 14 ersetzt; Anspruch 17 in geanderte AnsprQche 15, 16 und 1 7 unterteilt; neue AnsprQche 20 und 21 hinzugefQgt." 

"ErkUmng nach Artikel 19(1)" (Regal 46.4) 

Den ^Anderungen kann eine ErWarung beigefQgt werden, mit der die Anderungen eriautert und ihre Auswirkungen auf die 
Besehreibung und die Zetchnungen dargeiegt werden (die nicht nach Artikel 19 (1) geAndert werden konnen). 

Die Erklarung wird zusammen mrt der intern ationaJen Anmeldung und den geanderten AnsprOchen veroffentiicht 
Sle Ist In der Sprache abzutassen, In der die Internatlonafen Anmeldung verdffentllcht wlrd. 

Siernufl kurz g eh arte n setn und darf, wenn in englisoher Sprache abgefaftt oder ins Engltsche ubersetzt. nicht mehr ais 500 
Worter umfassen 

Die ErWarung ist nicht zu verwechsetn mit dem Begfeitschreiben, das auf die Unterschiede zwischen den AnsprOchen in der 
eingereichten Fassung und den geanderten AnsprOchen hinweist, und ersetzt letzteres nicht. Sie ist auf einem gesonderten Blatt 
einzureichen und in der Uberschnft aJs sol one zu kennzeichnen, vorzugsweise mit den Worten "ErWarung nach Artikel 19 (1)'. 

ten^^S^^^ ^ inter nationaten Becherchenbencht oder o3e Bedeutung von in dem 

Bencht angefOhrten Vertffenthchungen enthalten. Sie darf auf im intemationaien Recherchenbericht angefOhrte Verofferrtlichun- 
nehmen e,non best,rnrrrten Anspruch beziehen, nur im Zusammenhang mrt einer Anderung dieses Anspruchs Bezug 



Auswlrfcungen eines beretts gestellten Ant rags auf irrtemattonalevoriauflge PrOfung 

alft^ 252^* d °li E J nr S! h A lJD9 V ) ^ Anderun 9 en nach Artikel 19 bererts ein Antrag auf intemationale vorlaufige PrOfung 
^ e "jT°^V <f Anmelder in seinem fnteresse gleichzeitig mit der Einreichung der Anderungen beim Intern at ion alen 

tie^Te^sS ,ntefnationalen vortaufigen PrOfung beauftragen Behorde einreichen (siehe 

na*^a k |e I ph«^e' 0n Andcnin9en h,nsJcht,ich def Obersetzung dertntematlonaian Anmeldung balm Bntrttt In die 

eeteu^l^ BnWtt in ^-f " afciona,e ***** rnftglicherweise anstatt oder zusatzlich zu der Gber- 

^^i* / P ^^fJ n e,n 9* reK:hten Faasun 9 om ® Ubersetzung der nach Artikel 19 geanderten AnsprQche an cSe 
beshmmten/ausgewflhrten Amter zu Obermitteln ist. ^ 

zTert^hrZ^^ **** d * Erfordomi *" Jodes ^immten/ausgewahrten Amts sind Band II des PCT-Lertfadens fur Anmelder 



Anmertojngen zu FormbJatt PCT/ISA/220 (Blatt 2) (Januar 1994) 

BNSDOCID: <XSISA220NODEP4J_> 



VERTRAG UBER DIE INTERNATIONALE ZUSAMMENARBEIT 
AUF DEM GEBIET DES PATENTWESENS 

PCT 

INTERNATIONALER RECHERCHENBERICHT 

(Artikel 18 sowie Regeln 43 und 44 PCT) 



Aktenzeichen des Anmelders Oder Anwalts 

99P1974P 



WEITERES 
VORGEHEN 



siehe Mitteilung uber die Ubermitttung des internationalen 
Recherchenberichts (Formblatt PCT/ISA/220) sowie, soweit 
zutreffend, nachstehender Punkt 5 



Internationales Aktenzeichen 
PCT/DE 00/01001 



Internationales Anmeldedatum 

(T ag/Monat/Jahr) 

03/04/2000 



(FrOhestes) Prioritatsdatum (Tag/Monat/Jahr) 

02/06/1999 



Anmelder 



SIEMENS AKTIENGESELLSCHAFT 



Dieser internationafe Recherchenbericht wurde von der Internationalen Recherchenbe horde erstellt und wird dem Anmelder gemaB 
Artikel 18 ubermittelt. Eine Kopie wird dem InternationaJen Buro ubermittelt. 

Dieser internationale Recherchenbericht umfaBt insgesamt _3> Blatter. 

PH Daruber hinaus liegt ihm jeweits eine Kopie der in diesem Bericht genannten Unterlagen zum Stand der Technik bei. 

1 . Grundlage des Berichts 

a. Hinsichtlich der Sprache ist die internationale Recherche auf der Grundiage der internationalen Anmeldung in der Sprache 
durchgefuhrt worden, in der sie eingereicht wurde, sofern unter diesem Punkt nichts anderes angegeben ist 



2. 
3. 



□ 



Die internationale Recherche ist auf der Grundlage einer bei der Behdrde eingereichten Ubersetzung der internationalen 
Anmeldung (Regel 23.1 b)) durchgefuhrt worden. 

Hinsichtlich der in der internationalen Anmeldung offenbarten Nucleotid- und/oder Aminosauresequenz ist die internationale 
Recherche auf der Grundlage des Sequenzprotokolls durchgefuhrt worden, das 
I | in der internationalen Anmeldung in Schriflicher Form enthalten ist. 

zusammen mit der internationalen Anmeldung in computerlesbarer Form eingereicht worden ist. 
bei der Behdrde nachtraglich in schriftlicher Form eingereicht worden ist. 
bei der Behdrde nachtraglich in computerlesbarer Form eingereicht worden ist. 



□ 
□ 
□ 
□ 

□ 

□ 
□ 



Die Erklarung, daB das nachtraglich eingereichte schriftliche Sequenzprotokoll nicht uber den Offenbarungsgehalt der 
internationalen Anmeldung im Anmeldezeitpunkt hinausgeht, wurde vorgelegt. 

Die Erklarung, daB die in computerlesbarer Form erfaBten Informationen dem schriftlichen Sequenzprotokoll entsDrechen 
wurde vorgelegt. 

Bestimmte Anspriiche haben sich als nicht recherchierbar erwiesen (siehe Feld I). 
Mangelnde Einheitlichkelt der Erfindung (siehe Feld II). 



4. Hinsichtlich der Bezeichnung der Erfindung 

PH wird der vom Anmelder eingereichte Wortlaut genehmigt. 
I | wurde der Wortlaut von der Behdrde wie folgt festgesetzt: 



6. 



Hinsichtlich der Zusammenfassung 

wird der vom Anmelder eingereichte Wortlaut genehmigt. 

□ wurde der Wortlaut nach Regel 38.2b) in der in Feld III angegebenen Fassung von der Behdrde festgesetzt. Der 
Anmelder kann der Behdrde innerhalb eines Monats nach dem Datum der Absendung dieses internationalen 
Recherchenberichts eine Stellungnahme vorlegen. 

Folgende Abbildung der Zelchnungen ist mit der Zusammenfassung zu verdffentlichen: Abb. Nr. 2 
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Beschreibung 

Verfahren und Anordnung zur Ermittlung einer Gesaxntf ehlerbe- 
schreibung zumindest eines Tells eines Conputerprogramms so- 
5 wie Compute rprogramm-Erzeugnis und computerlesbares Speicher- 
medium 



Die Erfindung betrifft ein Verfahren und eine Anordnung zur 
Ermittlung einer Gesamtf ehlerbeschreibung zumindest eines 
10 Teils eines Computerprogramms sowie ein Computer-Erzeugnis 
und ein computerlesbares Speichermedium. 

Ein solches Verfahren und eine solche Anordnung ist aus [1] 
bekannt. 

15 

Aus [1] ist bekannt, eine Gesamtf ehlerbeschreibung in Form 
eines Gesamtf ehlerbaums fur ein Computerprogramm rechnerge- 
stutzt zu ermitteln. Fur das Computerprogramm wird eine Kon- 
trollf luiibeschreibung in Form eines Kontrollf lufigraphen er- 

20 mittelt. Fur verschiedene Programmelemente des Computerpro- 
gramms wird unter Verwendung einer gespeicherten Fehlerbe- 
schreibung, die jeweils einem gespeicherten Ref erenzelement 
zugeordnet ist, eine Elementenf ehlerbeschreibung ermittelt. 
Mit der Fehlerbeschreibung eines Ref erenzelements werden mog- 

25 liche Fehler des jeweiligen Ref erenzelements beschrieben* Aus 
den Elementenf ehlerbeschreibungen in Form von Elementenf eh- 
lerbaumen wird die Gesamtf ehlerbeschreibung unter Berucksich- 
tigung des Kontrollf lufigraphen zu den Computerprogramm ermit- 
telt. 

30 

Das Verfahren und die Anordnung aus [1] weisen insbesondere 
folgende Nachteile auf. Der ermittelte Gesamtf ehlerbaum ist 
hinsichtlich der untersuchten Fehler und deren Ursachen un- 
vollstandig und damit unzuverlassig . Somit ist diese Vorge- 
35 hensweise fiir sicherheitskritische Anwendungen im Rahmen der 
Fehlerbaumgenerierung far ein Computerprogramm nicht sinnvoll 
einsetzbar. Auch sind die einzelnen Fehlerbaume, die den Re- 
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f erenzelementen zugeordnet sind, unvollstandig und damit un- 
zuverlassig. 

In [2] ist eine Obersicht iiber ein sogenanntes Slicing zu 
finden. Slicing entspricht der Analyse, die bei der Ursachen 
suche fur ein Fehlverhalten eines Computerprogrammes durchge 
fuhrt wird. Im Rahmen dieses Vorgehens wird gepriift, ob das 
Fehlverhalten durch eine aktuell betrachtete Anweisung verur 
sacht wurde . Ist dies nicht der Fall, so werden die Anweisun 
gen tiberpriift, die fiir die Anweisung Daten liefern oder ihre 
Ausfiihrung steuern. Dieses Verfahren wird fortgesetzt, bis 
keine Vorgange mehr existieren, also Eingabedaten des Compu- 
te rprogramms erreicht werden. Beim Slicing werden sogenannte 
Slices ermittelt. Mit einem Slice wird dargestellt, welche 
Anweisungen auf welche Weise von einem betrachteten Wert be- 
einfluflt werden. Im weiteren wird unter dem Begriff Slicing 
stets ein ruckwarts gerichtetes Slicing verstanden. 

Aus [3] ist es bekannt, zu einem Computerprogramm eine Kon- 
trollf luBbeschreibung und eine Datenf luBbeschreibung zu er- 
mitteln. In [3] wird diese Darstellung als Ausgangsbasis fur 
sogenanntes datenf luBorientiertes Testen des Computerpro- 
gramms eingesetzt. Den Anweisungen (Knoten) des Kontrollf luB- 
graphen werden Datenf luBattribute (Datenf luBbeschreibung) zu- 
geordnet, die die Art der in den Anweisungen des Computerpro- 
grammes enthaltenen Datenzugrif f e beschreibt. Es werden 
schreibende Zugriffe und lesende Zugriffe unterschieden . 
Schreibzugrif f e werden als Definitionen (def) bezeichnet. Le- 
sende Zugriffe werden als Referenz bezeichnet. Erfolgt ein 
lesender Zugriff in einer Entscheidung, so wird dieser Zu- 
griff als pradikative Referenz (p-use, predicate use) be- 
zeichnet. Ein lesender Zugriff in einer Berechnung eines Wer- 
tes wird als berechnende Referenz bezeichnet (c-use, computa- 
tional use) . 

Aus [4] sind Grundlagen uber einen Fehlerbaum bekannt. Unter 
einem Fehlerbaum ist, wie in [4] beschrieben, eine Struktur 
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zu verstehen, die logische Zusammenhange zwischen Eingangs- 
grofien des Fehlerbaums beschreibt, welche Eingangsgrofien zu 
einem vorgegebenen unerwunschten Ereignis fiihren. 

Ferner sind aus [5] verschiedene Verfahren zur Fehlerbaum- 
analyse bekannt. 

Der Erfindung liegt das Problem zugrunde, eine Gesamtf ehler- 
beschreibung zu ermitteln, die gegemiber einer gemafi dem Ver- 
fahren aus [1] bekannten Ermittlung eines Gesamtf ehlerbaums 
zuverlassiger ist . 

Das Problem wird durch das Verfahren sowie durch die Anord- 
nung mit den Merkmalen gemafi den unabhangigen Anspruchen so- 
wie durch das Computer-Erzeugnis und das computerlesbare 
Speichermedium mit den Merkmalen gemafi den unabhangigen An- 
sprtichen gelost. 

Bei einem Verfahren zur Ermittlung einer Gesamtf ehlerbe- 
schreibung zumindest eines Teils eines Computerprogrammes, 
durch einen Computer, ist zumindest der Teil des Computerpro- 
grammes gespeichert. Es wird eine Kontrollf lufibeschreibung 
und eine Datenf lufibeschreibung zu dem Teil des Computerpro- 
grammes ermittelt und es werden Programmelemente aus dem Teil 
des Computerprogrammes ausgewahlt. Fur jedes ausgewahlte Pro- 
grammelement wird unter Verwendung einer gespeicherten Feh- 
lerbeschreibung eine Elementenf ehlerbeschreibung ermittelt. 
Die Fehlerbeschreibung ist jeweils einem Ref erenzelement zu- 
geordnet. Mit der Elementenf ehlerbeschreibung werden mogliche 
Fehler des jeweiligen Programmelementes beschrieben. Mit ei- 
ner Fehlerbeschreibung eines Ref erenzelements werden mogliche 
Fehler des jeweiligen Ref erenzelements beschrieben. Aus den 
Elementenf ehlerbeschreibungen wird unter Berucksichtigung der 
Kontrollf lufibeschreibung und der Datenf lufibeschreibung die 
Gesamtf ehlerbeschreibung ermittelt . 
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Eine Anordnung zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogrammes weist einen 
Prozessor auf, der derart eingerichtet ist, dafi folgende Ver- 
f ahrensschritte durchf tihrbar sind: 

- Zumindest der Teil des Computerprogramms ist gespeichert, 

- es werden eine Kontrollf luBbeschreibung und eine Daten- 

f luBbeschreibung fur den Teil des Computerprogramms ermit- 
telt, 

- aus dem Teil des Computerprogrammes werden Programmelemen- 
te ausgewahlt, 

- fur jedes ausgewahlte Programmelement wird unter Verwen- 
dung einer gespeicherten Fehlerbeschreibung, die jeweils 
einem Ref erenzelement zugeordnet ist, eine Elementenf eh- 
lerbeschreibung ermittelt, mit der mogliche Fehler des je- 
weiligen Programmelements beschrieben werden, 

- mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, 

- aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
lerbeschreibung unter Berucksichtigung der Kontrollf luBbe- 
schreibung und der Datenf luBbeschreibung ermittelt. 

Ein Computerprogramm-Erzeugnis umfaBt ein computerlesbares 
Speichermedium, auf dem ein Programm gespeichert ist, daB es 
einem Computer ermoglicht, nachdem es in einen Speicher des 
Computers geladen worden ist, folgende Schritte durchzuf uhren 
zur Ermittlung einer Gesamtf ehlerbeschreibung zumindest eines 
Teils eines Computerprogramms: 

- Zumindest der Teil des Computerprogramms ist gespeichert, 

- es werden eine Kontrollf luBbeschreibung und eine Daten- 

f luBbeschreibung fur den Teil des Computerprogramms ermit- 
telt, 

- aus dem Teil des Computerprogrammes werden Programmelemen- 
te ausgewahlt, 

- fiir jedes ausgewahlte Programmelement wird unter Verwen- 
dung einer gespeicherten Fehlerbeschreibung, die jeweils 
einem Ref erenzelement zugeordnet ist, eine Elementenf eh- 
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lerbeschreibung ermittelt, mit der mogliche Fehler des je- 
weiligen Programmelements beschrieben werden, 

- mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 

5 ben, 

- aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
lerbeschreibung unter Berucksichtigung der Kontrollf lufibe- 
schreibung und der Datenf luflbeschreibung ermittelt. 

10 Auf einem computerlesbaren Speichermedium ist ein Programm 

gespeichert, dafi es einem Computer ermbglicht/ nachdem es in 
einen Speicher des Computers geladen worden ist, folgende 
Schritte durchzuf iihren zur Ermittlung einer Gesamtf ehlerbe- 
schreibung zumindest eines Teils eines Compute rprogramms : 

15 - Zumindest der Teil des Computerprogramms ist gespeichert, 

- es werden eine Kontrollf lulibeschreibung und eine Daten- 

f lufibeschreibung fur den Teil des Computerprogramms ermit- 
telt, 

- aus dem Teil des Computerprogrammes werden Programmelemen- 
20 te ausgewahlt, 

- fur jedes ausgewahlte Programmelement wird unter Verwen- 
dung einer gespeicherten Fehlerbeschreibung, die jeweils 
einem Ref erenzelement zugeordnet ist, eine Elementenf eh- 
lerbeschreibung ermittelt, mit der mogliche Fehler des je- 

25 weiligen Programmelements beschrieben werden, 

- mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, 

- aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
30 lerbeschreibung unter Berucksichtigung der Kontrollf luiibe- 

schreibung und der Datenf lulibeschreibung ermittelt. 

Durch die Erfindung ist es nunmehr moglich, eine zuverlassi- 
ge, die Eigenheiten eines Computerprogramms berucksichtigende 
35 Gesamtf ehlerbeschreibung fur ein Computerprogramm oder einen 
Teil desselben zu ermitteln. Da die ermittelte Gesamtf ehler- 
beschreibung wesentlich zuverlassiger ist als die gemaii dem 
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Verfahren aus [1] ermittelbare Gesamtf ehlerbeschreibung, ist 
die Erfindung auch flir sicherheitskritische Anwendungen, d.h. 
insbesondere flir die Ermittlung einer Gesamtf ehlerbeschrei- 
bung eines sicherheitskritischen Computerprogramms geeignet* 

5 

Bevorzugte Weiterbildungen der Erfindung ergeben sich aus den 
abhangigen Ansprtichen. 

Die Kontrollf lufibeschreibung und/oder die Datenf lufibeschrei- 
10 bung kann/konnen in Form eines Kontrollf lufigraphen bzw. eines 
Datenf luiigraphen vorliegen. 

Die Fehlerbeschreibung kann in Form eines gespeicherten Feh- 
lerbaums vorliegen und die Elementenf ehlerbeschreibung kann 
15 als Elementenf ehlerbaum ermittelt werden. In diesem Fall kann 
die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum ermittelt 
werden, 

Durch diese Weiterbildung ist eine standardisierte Darstel- 
20 lung einer Fehlerbeschreibung moglich, was es einem Benutzer 
der Fehlerbeschreibung erheblich vereinfacht, diese zu analy- 
sieren . 

Die Gesamtf ehlerbeschreibung kann in einer Weiterbildung ein- 
25 gesetzt werden zur Fehleranalyse des Teils des Computerpro- 
gramms . 

Diese Weiterbildung weist insbesondere den Vorteil auf , dafi 
eine automatisierte, zuverlassige Fehleranalyse, bei Vorlie- 
30 gen der Fehlerbeschreibungen in Form von Fehlerbaumen sogar 

eine gemafi den Fehlerbaumanalyseverf ahren "normierte" Analyse 
der Fehlerbeschreibung moglich wird. 

In einer weiteren Ausgestaltung wird die Gesamtf ehlerbe- 
35 schreibung als Gesamtf ehlerbaum ermittelt und der Gesamtfeh- 
lerbaum wird hinsichtlich vorgebbarer Rahmenbedingungen ver- 
andert • 
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Die Veranderung kann durch Hinzufiigen eines Erganzungsf ehler- 
baums erfolgen. 



5 Ein Ausfiihrungsbeispiel der Erfindung ist in den Figuren dar- 
gestellt und wird im weiteren naher erlautert: 



Es zeigen 



10 Figur 1 einen Computer, mit dem das Verfahren gemafi dem Aus- 
fiihrungsbeispiel durchgefiihrt wird; 

Figur 2 ein Ablauf diagramm, in dem die einzelnen Verfahrens- 
schritte des Verfahrens gemafi dem Ausfiihrungsbeispiel 
dargestellt sind; 
15 Figur 3 eine Darstellung eines allgemeinen Fehlerbaums, wie 

er fur ein Ref erenzelement prinzipiell gebildet wird; 

Figuren 4a bis 4c einen Kontrollf lufigraphen (Figur 4a) , einen 
Slice (Figur 4b) und einen Fehlerbaum (Figur 4c) ftir 
eine Anweisungssequenz als Ref erenzelement eines Com- 
20 puterprogramms; 

Figuren 5a bis 5c einen Kontrollf lufigraphen (Figur 5a), einen 
Slice (Figur 5b) und einen Fehlerbaum (Figur 5c) fur 
eine Auswahlsequenz als Ref erenzelement eines Compu- 
terprogramms ; 

25 Figur 6a bis 6c einen Kontrollf lufigraphen (Figur 6a), einen 
Slice (Figur 6b) und einen Fehlerbaum (Figur 6c) fur 
eine Schleife als Ref erenzelement eines Computerpro- 
gramms; 

Figur 7 ein Kontrollf lufigraph mit Datenf lufigraph zu einem 
30 Computerprogramm gemafi dem Ausf uhrungsbeispiel ; 

Figuren 8a und 8b einen Slice der Ausgabe der Variable max 

(Figur 8a) bzw. einen Slice zu der Variable avr (Fi- 
gur 8b) zu dem Programm gemafi dem Ausf uhrungsbei- 
spiel ; 

35 Figur 9 den Slice fur die Variable avr, in dem eine Struktur 
der Schleife aus dem Programm des Ausf iihrungsbei- 
spiels hervorgehoben ist; 
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Figur 10 einen Fehlerbaum fur die Annahme, dafi die Variable 
avr fehlerhaft ist; 

Figur 11 den Gesamt fehlerbaum gemafi Figur 10, wobei redundan- 
te Ereignisse aus dem Gesamtf ehlerbaum gemafi Figur 10 
zu einem Ereignis zusammengef afit worden sind. 

Fig.l zeigt einen Computer 100 mit dem das im weiteren be- 
schriebene Verfahren durchgefiihrt wird. 

Der Computer 100 weist einen Prozessor 101 auf, der liber ei- 
nen Bus 103 mit einem Speicher 102 verbunden ist. Mit dem Bus 
103 ist ferner eine Eingangs-/Ausgangsschnittstelle 106 ver- 
bunden . 

In dem Speicher 102 ist ein Computerprogramm 104 gespeichert, 
fur das auf die im folgenden beschriebene Weise eine Ge- 
samtf ehlerbeschreibung ermittelt wird. Ferner ist in dem 
Speicher 102. ein Programm 105 gespeichert, durch das das im 
weiteren beschriebene Verfahren realisiert ist. Ferner sind 
in dem Speicher Fehlerbeschreibungen 115 unterschiedlicher 
Ref erenzelemente eines Computerprogramms gespeichert. Mit ei- 
ner Fehlerbeschreibung eines Ref erenzelements werden mogliche 
Fehler des jeweiligen Ref erenzelements beschrieben. Verschie- 
dene Ref erenzelemente und den Ref erenzelementen zugeordnete 
Fehlerbeschreibungen werden im weiteren detailliert erlau- 
tert. 

Mit der Eingangs-/Ausgangsschnittstelle 106 ist uber eine er- 
ste Verbindung 107 eine Tastatur 108 verbunden. Ober eine 
zweite Verbindung 109 ist die Eingangs-/Ausgangsschnittstelle 
106 mit einer Computermaus 110 und uber eine dritte Verbin- 
dung 111 ist die Eingangs-/Ausgangsschnittstelle 106 mit ei- 
nem Bildschirm 112 verbunden, auf dem die ermittelte Ge- 
samtf ehlerbeschreibung des Computerprogramms 104 dargestellt 
wird. Uber eine vierte Verbindung 113 ist die Eingangs- 
/Ausgangsschnittstelle 106 mit einem externen Speichermedium 
114 verbunden. 
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Fig. 2 zeigt in einem Blockschaltbild die Vorgehensweise gemafi 
dem im weiteren beschriebenen Ausf Uhrungsbeispiel . 

5 Aus dem gespeicherten Compute rprogramm 104 werden ein Kon- 
trollf lufigraph 201 und ein Datenf lufigraph 202 fur das .Compu- 
terprogramm 104 ermittelt. 

Aus dem Computerprogramm werden einzelne Programmelemente 
10 ausgewahlt (Schritt 203) . Fur jedes ausgewahlte Programmele- 
ment wird unter Verwendung einer gespeicherten Fehlerbe- 
schreibung, die einen zu dem ausgewahlten Programmelement 
korrespondierenden Ref erenzelement zugeordnet ist, eine Ele- 
mentenf ehlerbeschreibung ermittelt (Schritt 204) . Mit der 
15 Elementenf ehlerbeschreibung werden mogliche Fehler des jewei- 
ligen ausgewahlten Programmelements beschrieben. 

Ausgehend von einem von einem Benutzer vorgegebenen zu unter- 
suchenden Fehlerereignis in dem Computerprogramm (unerwunsch- 
20 tes Ereignis) wird in einem letzten Schritt (Schritt 205) ei- 
ne Gesamtf ehlerbeschreibung des Computerprogrammes fiir den zu 
untersuchenden Fehlerfall ermittelt aus den Elementenf ehler- 
beschreibungen, wobei der Kontrollf lufigraph und der Daten- 
f lufigraph berucksichtigt werden. 

25 

Der ermittelte Gesamtf ehlerbaum wird dem Benutzer auf dem 
Bildschirm 112 dargestellt. 

Fig. 3 zeigt die grundlegende Vorgehensweise bei der Erstel- 
30 lung eines Fehlerbaums, wie sie im Rahmen des Ausgangsbei- 
spiels verwendet worden ist zur Bildung der im weiteren be- 
schriebenen Fehlerbaume zu den Ref erenzelementen . 

Zu einem von einem Benutzer ausgewahlten Ereignis 301 ist zu 
35 ermitteln, wie das ausgewahlte fehlerhafte Ereignis entsteheri 
kann. Bei einem Computerprogramm kann eine fehlerhafte Ausga- 
be einer Variablen als ausgewahltes fehlerhaftes Ereignis 
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(unerwiinschtes Ereignis) 301 verursacht werden durch einen 
Kontrollf lufif ehler 303 und/oder einen Datenfehler 304 
(INKLUSIV-ODER-Verknupfung 302) . 

Unter einem Kontrollf lufif ehler 303 ist eine fehlerhafte An- 
steuerung der Verarbeitung der jeweiligen Variablen zu ver- 
stehen* 

Unter dem Datenf lufif ehler 304 ist ein Fehler zu verstehen, 
der durch fehlerhafte Daten bei der Verarbeitung entsteht. 

Der Datenf lufif ehler 304 kann in dem aktuell betrachteten Ver- 
arbeitungsschritt neu entstehen (Block 306) und/oder er kann 
schon vorhanden gewesen sein und lediglich durch Fehlerpropa- 
gation erhalten bleiben Block 307) (INKLUSIV-ODER-Verknupfung 
305) . 

Ausgehend von diesen Uberlegungen werden im weiteren fur fol- 
gende Elemente eines Computerprogrammes jeweils der entspre- 
chende Fehlerbaum, ein die Anweisung beschreibender Slice so- 
wie ein Kontrollf lufigraph dargelegt: 

- eine Anweisungssequenz, 

- ein Auswahl element, 

- ein Schleif enelement . 

Anwei sungsseguenz 

Die Anweisungssequenz 401 weist die in Fig. 4a dargestellten 
drei Anweisungen auf . In einer ersten Anweisung 402 wird ei- 
ner ersten Variable j der Wert 3 zugewiesen (j := 3) . Durch 
eine zweite Anweisung 403 wird einer zweiten Variable k der 
Wert 2 zugeordnet (k := 2) . Durch eine dritte Anweisung 404 
wird eine Summe tiber die erste Variable und die zweite Varia- 
ble gebildet (i := j + k) . 
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Es wird gemafi der Vorgehensweise aus [2] zu dieser Anwei- 
sungssequenz 401 ein Slice 410 gebildet, wie er in Fig. 4b 
dargestellt ist. Die erste Anweisung 402 und die zweite An- 
weisung 4 03 haben beide Auswirkungen auf die dritte Anweisung 
404, was durch zwei Pfeile 411, 412 in dem Slice 410 darge- 
stellt ist. 

Zu dem Kontrollf lufigraph 401 ergibt sich der in Fig. 4c darge- 
stellte Fehlerbaum 420 fur folgendes vorgegebenes unerwiinsch- 
tes Ereignis 421: 

"Variable i ist nach der dritten Anweisung f ehlerhaf t" . 

Das fehlerhafte Ereignis 421 kann durch einen Fehler bei der 
betrachteten dritten Anweisung 404 selbst bei bis zu diesem 
Anweisungsschritt korrekten Daten erzeugt worden sein (Ele- 
ment 422 in Fig. 4c) . Das fehlerhafte Ereignis 421 kann jedoch 
auch durch verfalschte Eingabedaten der dritten Anweisung 
verursacht werden, d.h. durch INKLUSIV-ODER-Verkmipf ung 424 
der Ereignisse, dafi die zweite Variable k nach der zweiten 
Anweisung fehlerhaft war (Element 425) und/oder dafi die erste 
Variable j nach der ersten Anweisung 402 fehlerhaft war (Ele- 
ment 426) . Das Ergebnis der ersten INKLUSIV-ODER-Verkmipf ung 
424 wird inklusiv-oder verkntipft mit dem Ereignis, dafi die 
dritte Anweisung fehlerhaft ist ( INKLUSIV-ODER- Verknupf ung 
423) . 

Auswahlelement 

Bei einem Auswahlelement als Ref erenzelement miissen Fehler- 
moglichkeiten der Datenflusse und der Kontrollf lusse inner- 
halb des Compute rprogramms beachtet werden. 

In den Fig. 5a bis Fig. 5c ist ein Kontrollf lufigraph 501 (vgl. 
Fig. 5a), ein Slice 520 (vgl. Fig. 5b) sowie ein Fehlerbaum 540 
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(vgl. Fig. 5c) fur eine If-Then-Else-Anweisung als Auswahlele- 
ment dargestellt. 

Der Kontrollf lufigraph 501 umfafit folgende sechs Anweisungen: 

- Eine erste Anweisung 502, mit der einer ersten Variable j 
der Wert 3 zugeordnet wird (j := 3), 

- eine zweite Anweisung 503, mit der einer zweiten Variable 
k ein vorgebbarer Wert zugeordnet wird (k := . ..), 

- eine dritte Anweisung 504, in der uberpruft wird, ob die 
zweite Variable k einen Wert grofier als 0 aufweist; ist 
der Wert der zweiten Variable grofier 0, dann verzweigt die 
Anweisung zu einer vierten Anweisung 505, sonst zu einer 
funften Anweisung 506, 

- die vierte Anweisung 505, in der einer dritten Variable i 
der Wert der zweiten Variable k zugeordnet wird (i := k) , 

- eine ftlnfte Anweisung 506, in der der dritten Variable i 
der Wert der zweiten Variable k mit negativem Vorzeichen 
zugeordnet wird (i:=-k), 

- eine sechste Anweisung 507, in der die dritte Variable i 
in beliebiger Weise weiterverarbeitet wird, 

Zu dem in Fig. 5a dargestellten Kontrollf lufigraphen 501 ergibt 
sich fur das Auswahlelement der in Fig. 5b dargestellte Slice 
520. 

Durchgezogene Kanten in dem Slice 520 stellen eine Datenab- 
hangigkeit der unterschiedlichen Anweisungen voneinander dar. 

Mit gestrichelten Kanten werden Kontrollabhangigkeiten der 
entsprechenden Anweisungen voneinander angegeben. 

Fur die beiden Kantentypen gelten die folgenden Def initionen: 

- gestrichelte Kanten, im weiteren als Kontrollkanten be- 
zeichnet, sind von Anweisungen, die eine pradikative Refe- 
renz enthalten (Ausf allkonstrukte, Schleif ensteuerung) , 
auf die unmittelbar kontrollierten Anweisungen gerichtet, 
d.h. auf jene Anweisungen, die nur ausgefuhrt werden, wenn 
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das Pradikat einen bestimmten Wert hat. Kontrollkanten 
werden nur zwischen der kontrollierenden Anweisung und un- 
mittelbar eingeschachtelten Anweisungen gezogen. 1st in 
einem kontrollierten Block eine weitere Kontrollebene ein- 
geschachtelt, so werden keine Kontrollkanten gezogen, die 
mehr als eine Ebene iiberstreichen. Da eine Kontrollbezie- 
hung transitiv ist, kann diese mittelbare Kontrolle aus 
dem Slice durch Ausnutzung der Transitivitat geschlossen 
werden. 

- durchgezogene Kanten, im weiteren als Datenf lufikanten be- 
zeichnet, sind von Anweisungen, in denen eine Variable de- 
finiert wird, auf Anweisungen gerichtet, in denen diese 
Variable referenziert wird. Die betrachtete Variable darf 
zwischen der Definition und der Referenz nicht erneut de- 
finiert werden. Man bezeichnet dies als def initionsf reien 
Pfad bezuglich der betrachteten Variablen. 

Der Slice wird ermittelt, indem ausgehend von der Anweisung 
mit der betrachteten Variablen, fur die das unerwunschte Er- 
eignis vorgegeben wird, der Kontrollf lufigraph gegen die Kan- 
tenrichtung nach Definition der betrachteten Variablen durch- 
sucht wird. Existieren zu der Definition berechnende Referen- 
zen, so wird das Verfahren rekursiv fortgesetzt, bis keine 
zusatzlichen Knoten mehr gefunden werden. Die auf diese Weise 
gefundenen Abhangigkeiten zwischen Anweisungen sind Datenab- 
hangigkeiten. Befindet sich ein betrachteter Knoten in einem 
Block, dessen Ausfiihrung von einer Entscheidung direkt ge- 
steuert wird, so stellt dies eine Kontrollabhangigkeit dar. 
Fur die pradikativen Referenzen der in der Entscheidung be- 
teiligten Variablen werden Knoten mit entsprechenden Defini- 
tionen - also Datenf lufiabhangigkeiten - rekursiv gesucht, die 
weitere Kontrollabhangigkeiten besitzen. 

Fig. 5b zeigt den zu dem Ausf allelement gehorenden Slice 520 
mit entsprechenden Kontrollkanten und Datenf lufikanten . 
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Fig. 5c zeigt den Fehlerbaum 54 0 fur das vorgegebene Ereignis 
"die dritte Variable i ist vor der 6. Anweisung fehlerhaft" 
541. 

5 Folgende Ereignisse fuhren in INKLUSIV-ODER-Verkniipf ung 542 
zu dem fehlerhaften Ereignis 541: 

- eine UND-Verkniipf ung 543 der Ereignisse, dafi die Entschei- 
dung gemafi der dritten Anweisung 504 wahr ist (Element 
544) und einem Ergebnis einer INKLUSIV-ODER-Verkniipf ung 

10 545 der Ereignisse, dafi die vierte Anweisung 505 fehler- 

haft ist (Element 54 6) und/oder die erste Variable j nach 
der ersten Anweisung 502 fehlerhaft ist (Element 547) ; 

- eine UND-Verkniipf ung 550 der Ereignisse, dafi die Entschei- 
dung gemafi der dritten Anweisung 504 falsch ist (Element 

15 551) mit einem Ergebnis einer INKLUSIV-ODER-Verkniipf ung 

552 der Ereignisse, dafi die fiinfte Anweisung fehlerhaft 
ist (Element 553) und/oder dafi die erste Variable j nach 
der ersten Anweisung 502 fehlerhaft ist (Element 554); 

- eine INKLUSIV-ODER-Verkniipf ung 560 der Ereignisse: Die 
20 Entscheidung gemafi der dritten Anweisung 504 ist fehler- 
haft (Element 561) und/oder die zweite Variable k ist nach 
der zweiten Anweisung 503 fehlerhaft (Element 562) . 

2 5 Mehrf ach-Auswahlelement 

Ein Mehrf ach-Auswahlelement als Ref erenzelement kann nach dem 
oben beschriebenen Schema durch Aufbrechen der Mehrfachaus- 
wahl in eine Kaskade von zweiseitigen Auswahlelementen, die 
30 gemafi dem oberen Vorgehen bearbeitet werden, behandelt wer- 
den, urn somit einen Fehlerbaum fur ein Mehrfach- 
Auswahlelement zu ermitteln. 



35 



Schleife 
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Die Fig. 6a bis Fig. 6c zeigen fur das Ref erenzelement einer 
Schleife einen Fehlerbaum 601 (vgl. Fig. 6a), den entsprechen- 
den Slice 620 (vgl. Fig. 6b) sowie den zugehorigen Fehlerbaum 
640 (vgl. Fig. 6c). 

Der Kontrollf luilgraph 601 fur ein Schleif enelement weist fol- 
gende sieben Anweisungen auf: 

- Eine erste Anweisung 602, mit der einer erste Variable i 
der Wert 0 zugeordnet wird (i := 0), 

- eine zweite Anweisung 603, mit der einer zweiten Variable 
j ein Wert frei zugeordnet wird (j := . ..), 

- eine dritte Anweisung 604, durch die einer dritten Varia- 
ble k ein weiterer Wert frei vorgegeben wird (k := ...), 

- eine vierte Anweisung 605, die als Schleif enanweisung eine 
Bedingung angibt, dafi eine funfte Anweisung sowie eine 
sechste Anweisung solange durchgeflihrt werden, solange der 
Wert der zweiten Variablen j > 0 ist (WHILE j > 0 DO) , 

- eine funfte Anweisung 606, in der der ersten Variable i 
ein Wert zugeordnet wird, der sich ergibt aus der Summe 
des bisherigen Werts der ersten Variable sowie dem Produkt 
aus der zweiten Variable und der dritten Variable 

(i := i + k * j) , 

- eine sechste Anweisung 607, durch die der zweiten Variable 
j ein Wert zugewiesen wird, der sich ergibt durch Vermin- 
derung des ursprtinglichen Werts der zweiten Variable j um 
den Wert 1 (j := j - 1), 

- eine siebte Anweisung 608, in der die erste Variable i in 
vorgebbarer Weise weiterbearbeitet wird (... := i ...). 

Fig. 6b zeigt den entsprechenden Slice 620 zu dem in Fig. 6a 
dargestellten Kontrollf luflgraphen 601 mit zugehorigen Kon- 
trollf lufikanten und Datenf lufikanten. 

Der in Fig. 6c dargestellte Fehlerbaum 640 wird gebildet fur 
das vorgegebene Ereignis 641, dali die "erste Variable i vor 
der siebten Anweisung fehlerhaft" ist. 
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Der Fehlerbaum 640 ergibt sich durch INKLUSIV-ODER- 
Verknupf ung 642 folgender vier Ereignisse: 

- Ein erstes Ereignis 643, das beschreibt, dafi die erste Va- 
riable i nach der ersten Anweisung 602 fehlerhaft ist, 

- eine UND-Verkniipf ung 644 aus den Ereignissen, dafi der 
Schleif enrumpf der Schleife mindestens zweimal durchlaufen 
worden ist (Element 645) und dem Ereignis, dafi die sechste 
Anweisung 607 fehlerhaft ist (646), 

- eine UND-Verkniipf ung 650 des Ereignisses, dafi der Schlei- 
f enrumpf mindestens einmal ausgefiihrt wurde (Element 651) 
und einer INKLUSIV-ODER-Verknupf ung 652 folgende vier Er- 
eignisse : 

a) die funfte Anweisung 606 ist fehlerhaft (Element 653), 

b) die erste Variable i ist nach der ersten Anweisung feh- 
lerhaft (Element 654) 

c) die zweite Variable j ist nach der zweiten Anweisung 
fehlerhaft (Element 655) , 

d) die dritte Variable k ist nach der dritten Anweisung 
fehlerhaft (Element 656) , 

- eine INKLUSIV-ODER-Verknupf ung 660 folgender drei Ereig- 
nisse : 

e) die Entscheidung gemafi der vierten Anweisung 605 ist 
fehlerhaft (Element 661), 

f) die zweite Variable j ist nach der zweiten Anweisung 
603 fehlerhaft (Element 662), 

g) eine UND-Verkniipf ung 663 der Ereignisse, dafi die sech- 
ste Anweisung fehlerhaft ist (Element 664) mit dem Er- 
eignis, dafi der Schleif enrumpf mindestens einmal durch- 
laufen worden ist (Element 665) . 

Die oben beschriebenen Fehlerbaume, die den einzelnen Refe- 
renzelementen zugeordnet sind, sind in dem Speicher 102 als 
Fehlerbaume 115 gespeichert. 
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Fig. 7 zeigt einen Kontrollf luBgraphen 700 zu folgendem Compu- 
terprogramm: 

input (n) ; 
5 input (a) ; 
max : = 0 ; 
sum: =0 ; 
i:=2; 

WHILE i =n DO 
10 IF max < a[i] 

THEN max:= a[i] 
sum: = sum + a[i] 
i:= i + 1 
avr:= sum/n; 
15 output (max) ; 
output (avr) ; 

Zu dem in Fig. 7 dargestellten Kontrollf luBgraphen 700 mit 13 
Anweisungen (Bezugszeichen 1, 2, 3, . .., 13) zeigt Fig. 8a den 
20 zugehorigen Slice 800 zu der Variablen max und Fig. 8b den zu- 
gehorigen Slice 810 zu der Variablen avr. Die Numerierung der 
einzelnen Anweisungen in den Slices entspricht der Numerie- 
rung der einzelnen Anweisungen in dem Kontrollf luBgraphen 700 
aus Fig. 7. 

25 

Fig. 9 zeigt den Slice 900 fur die Variable avr, wie er in 
Fig. 8b dargestellt ist. Die Struktur des in dem oben darge- 
stellten Programm enthaltenen Schleif enelements ist durch 
Fettdruck hervorgehoben . Diese Struktur entspricht dem in 
30 Fig. 6b dargestellten Slice fur ein Schleif enelement . 

Ein Gesamtf ehlerbaum 1000 fur das oben dargestellte Computer- 
programm ist in Fig. 10 dargestellt. Der Gesamtf ehlerbaum fur 
das Computerprogramm wird durch Instantiieren des entspre- 
35 chenden Fehlerbaums, der dem Ref erenzelement zugeordnet ist, 
das dem ausgewahlten Programmelement entspricht, erzeugt. 
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Durch ruckwarts gerichtetes Vorgehen ausgehend von dem vorge- 
gebenen unerwtinschten Ereignis wird somit unter Verwendung 
der den Referenzelementen zugeordneten Fehlerbaume der Ge- 
samtf ehlerbaum 1000 ermittelt. 

5 

In Fig. 10 ist der Fehlerbaum 1000 zu dem Ereignis, dali "die 
Variable avr vor der dreizehnten Anweisung fehlerhaft" ist 

(Element 1001) . Die Variable avr kann vor der dreizehnten An- 
weisung 13 fehlerhaft sein aufgrund mindestens eines der fol- 
io genden drei Ereignisse, wie dies auch in dem in Fig. 9 darge- 
stellten Slice 900 fur die Variable avr dargestellt ist 

(INKLUSIV-ODER-Verknupfung 1002) : 

- Eine Eingangsvariable n ist nach der ersten Anweisung 1 
fehlerhaft (Element 1003), 

15 - die elfte Anweisung 11 ist fehlerhaft (Element 1004), 

- der Wert der Variablen sum vor der elften Anweisung 11 ist 
fehlerhaft (Element 1005) . 

Die Variable sum ist vor der elften Anweisung 11 fehlerhaft 
20 (Element 1005) , wenn mindestens eines der folgenden Ereignis- 
se erfullt ist (INKLUSIV-ODER-Verknupfung 1006) : 

- Die Variable sum ist nach der vierten Anweisung 4 fehler- 
haft (Element 1007), 

- eine UND-Verkniipf ung 1008 des Ereignisses, dafl mindestens 
25 zweimal der Schleif enrumpf ausgefuhrt worden ist (Element 

1009) mit dem Ereignis, dafi die zehnte Anweisung 10 feh- 
lerhaft ist (Element 1010), 

- eine UND-Verkniipf ung 1011 des Ereignisses, daJ3 mindestens 
einmal der Schleif enrumpf ausgefuhrt worden ist (Element 

30 1012) mit dem Ergebnis einer INKLUSIV-ODER-Verknupfung 

1013 folgender vier Ereignisse: 

a) die neunte Anweisung 9 ist fehlerhaft (Element 1014), 

b) die Variable sum ist nach der vierten Anweisung 4 feh- 
lerhaft (Element 1015), 

35 c) die Variable i ist nach der flinften Anweisung 5 fehler- 

haft (Element 1016) , 
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d) die Variable a ist nach der zweiten Anweisung 2 fehler- 
haft (Element 1017) , 

- eine INKLUSIV-ODER-Verknupf ung 1018 folgender Ereignisse: 

e) die Entscheidung gemafl der sechsten Anweisung ist feh- 
lerhaft (Element 1019), 

f) die Variable i ist nach der fiinften Anweisung fehler- 
haft (Element 1020), 

g) die Variable n ist nach der ersten Anweisung fehlerhaft 
(Element 1021) , 

h) eine UND-Verkmipf ung 1022 des Ereignisses, dafi die 10. 
Anweisung fehlerhaft ist (Element 1023) mit dem Ereig- 
nis, dafi mindestens einmal der Schleif enrumpf ausge- 
fuhrt worden ist (Element 1024) . 

Der Fehlerbaum 1000 aus Fig. 10 wird zur anschaulicheren Dar- 
stellung dahingehend verandert, daJ5 Ereignisse, die in dem 
Fehlerbaum 1000 mehrfach dargestellt sind, zu einem Knoten 
eines Ursache-Wirkungs-Graphen 1100 (vgl. Fig. 11) zusammenge- 
falit werden. 

Auf den in Fig. 10 dargestellten Fehlerbaum 1000 wird ein Feh- 
lerbaumanalyseverfahren, wie in [5] beschrieben, angewendet, 
wodurch eine Analyse des Computerprogramms hinsichtlich eines 
vorgegebenen unerwunschten Ereignisses analysiert wird. 

Im weiteren werden Alternativen und weitere Anwendungsmog- 
lichkeiten des oben beschriebenen Ausf uhrungsbeispiels darge- 
stellt. 

Der mit dem oben beschriebenen Verfahren erzeugte Gesamtfeh- 
lerbaum kann zu verschiedenen Zwecken eingesetzt werden: 

- Beschreibung der Fehlererzeugung bzw. Fehlverhaltenspropa- 
gation durch einen Teil eines Computerprogramms im Rahmen 
einer Sicherheitsanalyse oder eine Zuverlassigkeitsanalyse 
des Computerprogramms , 

- Analyse von Sof twaref ehlermechanismen, beispielsweise im 
Rahmen einer Testf allgenerierung . 
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Im weiteren ist ein Computerprogramm in der Programmierspra 
che C++ angegeben, mit dem das Verfahren gemafl dem Ausfiih- 
rungsbeispiel realisiert ist: 



# include "AS_GraphKante . h w 
O 

^include <iostream> 
□ 

□ 

ostreami operator « ( ostreami os, const GraphKanteC & Kante) { 

□ 

os << Kante . KantenTyp; 

□ 

return os; 

□ 

} 



////////////////////////////////////////////////////////////////////////////////////// 

// Klasse zur Erzeugung von Kanten im Slice-Graph. 

// Es gibt zwei Arten von Kanten: 

// 1. KontrollfluB-Kanten KFK 

// 2. Datenflufi-Kanten DFK 

// Auch diese Klasse erfUllt die nice-Anf orderungen fur die STL. 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-09-12 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 
#ifndef _GraphNodeHeader 
^define _GraphNodeHeader 

# include <iostream> 
^include "KFGListNode . h" 

using namespace std; 

class GraphNodeC : public KFGListNodeC { 
public : 

//GraphNodeC ( ) (} ; 

friend ostreamS operator « ( ostreami os, const GraphNodeCfi Node); 

}; 

#endif 



////////////////////////////////////////////////////////////////////////////////////// 

// Klasse zur Erstellung eines Slice. Dieser Klasse wird ein leeres Obiekt 
□ 

// der Klasse Graph vererbt. 

□ - 

// Die Ecken des Graphen/Slice haben dieselbe Struktur wie die Listen im KFG . 
// Die Kanten sind von Typ KantenTypT; eine Klasse GraphKanteC lieB sich aus ' 
// fUr mich unersichtlichen GrUnden nicht in die Klasse Graph einbinden. 

// 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-09-12 Andreas Steinhorst - nrtrrnitii 

/////////////////////////////////////////////////////////////////////// /////////,///// 
#ifdef _SliceHeader 
ielse 

#define _SliceHeader 

^include "graph. h" 
ffinclude "AS_GraphKante . h" 
//^include "AS_GraphNode . h" 
^include "KFGListNode . h" 
ffinclude "KFGList . h" 

//using namespace std; 

//typedef enum { DFK, KFK} KantenTypT; 
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class SliceC : public GraptKKFGListNodeC, GraphKanteO { 
public: 

5 

Sliced) {}; 

void sliceFor Loops (KFGListC & L2, KFGListC :: iterator LOOPIT); 
10 KFGListC: : iterator def ineVariableToSlice ( KFGListC & L2); 

//void buildTestGraph { KFGListC & L2 ) ; 

void findAHDefs (KFGListC & LI, KFGListC: : iterator ITER); 



15 



KFGListC: : iterator findUpper Limit ( KFGListC & LI, KFGListC: : iterator ITER, 
KFGP UseListC: : iterator PUSEIT); 



KFGListC: : iterator findLowerLimit ( KFGListC & LI, KFGListC :: iterator ITER, 
2 0 KFGListC: : iterator UPPERLIMIT); 

KFGListC: : iterator f indLowerLimitFromCUse { KFGListC & LI, KFGListC :: iterator ITER 
KFGListC: : iterator UPPERLIMIT); 

25 KFGListC: : iterator f indUppe r Limit FromCUse (KFGListC & LI, KFGListC: : it erator ITER 

KFGUseListC: : iterator USEIT); 



int checkForNodes (int NodeNumber); 

void KFKPUseToCUse (KFGListC: : iterator PUSEIT, int Schl ei f enEnde ) ; 
void findDefToCUse (KFGListC & LI, KFGListC: : iterator ITER); 
void def InLoop( KFGListC & LI, KFGListC: : iterator ITER); 
void startBuildSlice (KFGListC & LI); 
void sliceAusgeben ( ) ; 



30 

35 

40 }; 

#endif 

45 ///////////////////////////////////////////////////////////////////////////// 
// Mit einigen Anderungen ubernommen aus "Die C++ Standard Template Library". 

// Template-Klasse Graph zur Erstellung von gerichteten oder unger i chteten 

// Graphen. Der Graph besteht aus einem Vektor E fur alle Ecken. Jedes 

OU // Vektorelement besteht wiederum aus einem Paar: der Ecke und der Menge der 

// Nachfolger. 

// Die Menge der Nachfolger wird durch den STL Datentyp map dargestellt; der 

// Schlussel zu einem Kantentyp/Kantenwert ist die Nummer einer nachf olqenden 

// Ecke. 

55 // 

///////////////////////////////////////////////////////////////////////////// 

#ifndef _graphHeader 

#define _graphHeader 

^include <assert.h> 
60 #include <map> 

^include <stack> 

#include <vector> 

tfinclude "checkvec.h" 

ff include <iostream> 
65 #include "AS_GraphNode . h" 

using namespace std; 

// Leere Parameterkl asse mit Mindestsatz von Operationen, 
// falls keine Kantengewichte benfitigt werden. 
fU struct Empty 

{ 

public : 

Empty ( int=0 ) { } 

^ c bool operator< ( const Empty* ) const { return true;} 

/ O } ; 

// Empty-Operationen, damit Ein-Ausgabe allgemein formuliert 
// werden kann 

//ostream& operator« ( ostream& os, const Emptyfi ) { return os; } 
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//istreami operator» ( istreamfi is, Empty& ) { return is;} 



template<class Eckentyp, class Kantentyp> 

class Graph 

{ 

public: 

typedef map<int, Kantentyp, less<int> > Nachfolger; 
typedef pair<Eckentyp, Nachfolger> Ecke; 
typedef checkedVector<Ecke> Graphtyp; 

//typedef vector<Ecke> Graphtyp; 
typedef Graphtyp :: iterator iterator; 
typedef Graphtyp :: const_i terator const_iterator ; 

Graph (bool g, ostreams os = cerr) 
: gerichtet ( g) , pOut(&os) {} 

Graph ( > { } 

size_t size{) const { return C.size(); ) 

bool istGerichtet { ) const { return gerichtet;} 
iterator beginU { return C.begin();} 

iterator end ( ) { return C.endO;} 

Ecke& operator (]( int i) { return C[i);} 

size_t AnzahlKanten { ) ; 

int insert (const Eckentyps e); 

void insert {const Eckentypfi el, const Eckentyp& e2, 

const Kantentyp& Wert); 
void verbindeEcken ( int el, int e2, // Uber Eckennummern 

const Kantentyp& Wert); 
void setgerichtet (bool wert); // neue Methode fur gerichtete/ungerichtete G 

phen, 

// die aber nicht 

wendet wird. 

void check ( ostreami = cout); 

void ZyklusUndZusammenhang { ostreami = cout); 

private : 

bool gerichtet; 

Graphtyp C; // Container 

ostreatn* pOut; 

; ; 



//Funktion, die UberprOft, ob es sich um einen gerichteten oder ungerichteten 
//Graphen handelt, und die Anzahl der Ecken und Kanten ausgibt . 
template<class Eckentyp, class Kantentyp> 
void Graph<Eckentyp, Kantentyp> :: check {ostreams os) 

{ 

os « "Der Graph ist " ; 

//if { ! istGerichtet { ) ) 

// os « «un"; 

os « "gerichtet und hat " 

« sized « M Knoten und " 

« AnzahlKanten ( ) « " Kanten\n"; 
//ZyklusUndZusammenhang (os); 

} 



//Methode, die einen Wert setzt, ob der Graph gerichtet oder ungerichtet ist. 

template<class Eckentyp, class Kantentyp> 

void Graph<Eckentyp, Kantentyp>: : setgerichtet (bool wert) 

{ 

gerichtet = wert; 

} 



//Funktion berechnet die Anzahl der Kanten in Graph 
template<class Eckentyp, class Kantentyp> 
size_t Graph<Eckentyp,Kantentyp>: : AnzahlKanten ( ) 

{ 

size_t Kanten = 0; 
iterator temp = begin () ; 
while (temp != end { ) ) 

Kanten += { *temp++ ). second . si ze () ; 
//if ( Igerichtet) 
// Kanten /« 2; 



GR 99 P 1974 



23 

return Kanten; 

} 



5 //Einftlgen einer Ecke in den Graphen, falls diese noch nicht vorhanden ist. 
tempi ate<cl ass Eckentyp, class Kantentyp> 

int Graph<Eckentyp, Kantentyp>: : insert ( const Eckentypfi e) 

{ 

for (int i = 0; i < size ( ) ; ++i ) 
10 if (e — C[i) .first) 

return i; 

// falls nicht gefunden, einfuegen: 
C.push_back {Ecke { e, Nachfolger ( ) } ) ; 
15 return size()-l; 



//Einftlgen einer Kante in den Graphen, indem zuerst die Ecken eingeftlgt werden. 
20 template<class Eckentyp, class Kantentyp> 

void Graph<Eckentyp, Kantentyp> :: insert ( const £ckentyp& el, 

const Eckentypfi e2, 
const Kantentypi Wert) 

ncr { 

2 5 int posl = insert (el); 

int pos2 - insert (e2); 
verbindeEcken (posl , pos2, Wert); 



30 



35 



40 



70 



75 



//Verbinden der beiden neu eingeftlgten Ecken durch eine Kante. 
template<class Eckentyp, class Kantentyp> 
void Graph<Eckentyp, Kantentyp> : : verbindeEcken ( 

int posl, int pos2, const Kantentypfi Wert) 

{ 

(C|posl ] .second) [pos2] = Wert; 

//if ( ! gerichtet ) // automatisch auch Gegenrichtung eintragen 
// (C[pos2] .second) [posl ] = Wert; 

} 



/* ZyklusUndZusammenhang ( ) arbeitet mit der Tiefensuche. 

Im Gegensatz zu CLR S. 478 wurde nicht mit der Rekursion 
gearbeitet, weil bei dieser Stack-Overflow bei grofien Graphen 
4 5 (zB. MILES . DAT bei mehr als 40 Knoten) auftrat. 

Die Nachbildung der Rekursion durch eigenen Stack 
erm£>glicht die Verarbeitung der gesamten Datei 

MILES . DAT (128 Knoten). Die Stacktiefe entspricht der Kantenanzahl 
+ 1 bei ungerichteten Graphen. 

50 */ 

template<class Eckentyp, class Kantentyp> 

void Graph<Eckentyp, Kantentyp> :: ZyklusUndZusammenhang ( ostream& os ) 

55 int Zyklen = 0; 

int Komponentenanzahl = 0; 

stack<int, vector<int> > EckenStack; // zu besuchende Ecken 

// alien Ecken den Zustand nichtBesucht zuordnen 
60 enum EckStatus {nichtBesucht, besucht, bearbeitet); 

vector<EckStatus> Eckenzustand ( si ze { ) , nichtBesucht); 

// alle Ecken besuchen 
for{int i = 0; i < size{); ++i ) 
65 if (Eckenzustand (i] == nichtBesucht) 

{ 

Komponentenanzahl++ ; 

// auf dem Stack zwecks Bearbeitung ablegen 
EckenStack . push ( i ) ; 



// Stack abarbeiten 

while ( ! EckenStack. empty ( ) ) 

{ 

int dieEcke = EckenStack . top () ; 
EckenStack . pop ( ) ; 

if {Eckenzustand [dieEcke] == besucht) 

Eckenzustand [dieEcke ] = bearbeitet; 
else 
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if (Eckenzustand [dieEcke] «- nichtBesucht ) 

{ 

Eckenzustand [dieEcke] = besucht; 
// neue Ecke, fur bearbeitet-Kennung vormerken 
5 EckenStack. push (dieEcke ) ; 

// Nachfolger vormerken: 

Graph<Eckentyp, Kantentyp>: :Nachfolger: : iterator 
start = operator [] (dieEcke) .second. begin( ) , 
10 ende = operator [] (dieEcke ). second . end () ; 

while (start != ende) 

{ 

int Nachf = ( *start ). first ; 
if (EckenzustandJNachf ] == besucht} 
15 { 

++Zyklen; // hier war schon jemand! 
CpOut) « "mindestens Ecke " 
« operator I ] (Nachf ). first 
« " ist in einem Zyklus\n"; 

20 ) 

if (EckenzustandlNachf ] « nichtBesucht ) 

EckenStack . push (Nachf ) ; 
++start; 

25 

} // Stack Empty? 
} // forf) ... if (Eckenzustand. . . 

i f (gerichtet ) 
30 { i f (Komponentenanzahl — = 1) 

os « "Der Graph ist stark zusammenh„ngend . \n" ; 
else 

os « "Der Graph ist nicht oder schwach " 
"2usammenh„ngend . \n" ; 



35 



40 



45 ) 



else 

os « "Der Graph hat " 

« Komponentenanzahl 

« " Komponente (n) . " « endl ; 

os << "Der Graph hat " ; 
if(Zyklen == O) 

os « "keine "; 
os « "Zyklen." « endl; 



50 



55 



//Ausgabe des Graphen. 

template<class Eckentyp, class Kantentyp> 
ostreams operator« ( ostreami os, 

^ Graph<Eckentyp, Kantentyp>& G) 

of stream Ziel ( " Faul tTree . uwg" ) ; 
ostream_iterator<uwgknotenC> POSIT ( Ziel ) ; 
ostream_iterator<uwgknotenC> POSIT2 (Ziel ) ; 
// Anzeige der Ecken mit Nachfolgern 

Ziel « "%%UWG" « endl « " \ " VO . 1 \ " ~ \ " Fehle rbaum\ "-\"A. St einhorst* \ " " « en dl 
"%%BEGIN" « endl; 
„ forfint i = 0; i < G.sizeO; + + i> 

60 { 

POSIT++ = G[i) . first; 
/*os « G[i], first « " <"; 
Graph<Eckentyp,Kantentyp>: :Nachfolger: iterator 
startN = G(i] .second. begin( ) , 
endeN = G [ i ]. second. end () ; 
while (startN ! = endeN) 
{ 

os « G[ CstartN) . first) . first « ' ' // Ecke 

« (*startN) .second « ' •; // Kantenwert 
*POSIT2++ = G[ CstartN) .first) .first; 
/ CKANTEIT++ = CstartN) .second; 

++startN; 

} 

os « M >\n";*/ 

*POSIT++; 

} 

for(int u = 0; u < G.sizeO; ++u) { 

Graph<Eckentyp, Kantentyp>: rNachfolger: : iterator 



65 



70 



75 
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startN = G[u) .second. begint ) , 

endeN = G [ u] . second. end () ; 
while (startN != endeN) { 

Ziel « W %%EDGE: B « G ( u ] . f i rst . getGatterldent { } « 

« G( (*startN) . first] . first. getGatterldent () « n /0; w « endl; 

++startN; 

} 

} 

Ziel « "%%PROBSLIST" « endl « W %%END" « endl; 
return os; 

} 

#endif 

#ifdef _KFGDef Header 
□ 

ielse 
□ 

#define _KFGDef Header 
□ 

□ 

#include <string> 
□ 

#include <iostream> 

a 
□ 

using namespace std; 
□ 



□ 
□ 
□ 
□ 
□ 
□ 
□ 



typedef char StringT (256]; 

class KFGDefC .{ 
private : 

StringT Def; 
int ScopeLevelD; 

public : 

KFGDefCM { strcpy (Def, unknown ~ 

ScopeLevelD - 0; }; 

KFGDefC(char _Def [], int _ScopeLevelD) 

{ strcpy (Def, _Def); 
ScopeLevelD = 

_ScopeLevelD; }; 

void setDef (char _Def (]) f strcpy (Def, _Def); }; 

char* getDefO { return Def; }; 

int getScopeLevelD( ) { return ScopeLevelD; }; 

bool operator == (const KFGDe fC& other) const 
other. Def) == 0) { retUrn ' < st rcmp ( Def , 

LevelD == other . ScopeLevelD) ) ; }; & (Scop 

bool operator != (const KFGDe fC& other) const 

. , { return !(*this == 

other ) ; } ; 

bool operator < (const KFGDe fC& other) const 
other. Def) < 0); }; { retUrn ^cmptDef, 

bool operator > (const KFGDe fC& other) const 
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{ return (strcmp(Def 

other. Def) > 0); }; 

friend ostream& operator « ( ostreamfi os, const KFGDef C& Node); 

); 

#endif 

////////////////////////////////////////////////////////////////////////////////////// 
□ 

// Klasse fUr Hilfsliste, um daraus einen KFG zu erstellen. 
// Diese Klasse erfailt die nice-Anf orderungen ftlr die STL; 
// d.h. fOr eine Klasse T gilt 

// 0. Sie unterstutzt den Copy-Konstruktor T (const T&), 
// 1. den Zuweisungsoperator T& operator= (const T& ) , 

// 2. den Vergleichsoperator bool operator== (const T, iconst T&) und 

// 3. den Ungleichoperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a(b} {a == b} 

// (b) { TRUE } a = b {a == b} 

// (c) { a == a} 

// (d) { a == b b == a } 

// (e) { (a == b) AND ( b == c ) ==> (a == c) } 
// (f) { a != b <==> NOT ( a== b) }; 

// 

// AuBerdem sind alle Funktionen, insbesondere getName equality preserving, d.h. 

// (g) { a == b == > a. getName () == b. getName () } 

// 

// (C) 1997 Siemens AG 

// 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-08-25 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

#ifdef _KFGLineNodeHeader 

Seise 

tfdefine _KFGLineNodeHeader 

^include <string> 
^include <iostream> 

using namespace std; 

typedef char StringL [1000]; 

class KFGLineNodeC { 
private : 

StringL Name; 
int LineNumber; 

public: 

KFGLineNodeC ( ) { strcpy (Name, " — unknown - 

LineNumber = 



") ; 
}; 

0; }; 



KFGLineNodeC (char _Name []) { strcpy (Name, _Name ) ; 
KFGLineNodeC ( char _Name (), int _LineNumber) 



_Name ) ; 

_LineNumber; } ; 



LineNumber = 

strcpy (Name 
LineNumber = 



void setName(char _Name (]) { strcpy (Name, _Name); }; 

char* getName {) { return Name; }; 

int getLineNumber ( } ( re turn LineNumber; }; 

bool operator == (const KFGLineNodeCfi other) const 

/ , ^ , {return 

( (strcmp (Name, other. Name) == 0) 
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& (LineNumber 

other . LineNumber) ) ; }; 

bool operator != {const KFGLineNodeCi other) const 

{ return ! (*th 

~= other ) ; } ; 

bool operator < (const KFGLineNodeC& other) const 

{ return 

( strcmp (Name, other. Name) < 0); }; 

bool operator > (const KFGLineNodeC& other) const 

{ return 

( strcmp (Name, other. Name) > 0); ); 

friend ostreamfi operator « ( ostreamfi os, const KFGLineNodeCfi Node); 

}; 

#endif 

////////////////////////////////////////////////////////////////////////////////////// 

// Klasse filr die Liste, die den KFG darstellt. 

// Diese Klasse erfUllt die nice-Anf orderungen ftir die STL; 

// d.h. ftir eine Klasse T gilt 

// 0. Sie untersttltzt den Copy-Konstruktor T (const T&), 
// 1. den Zuweisungsoperator T& operator 3 (const T& ) , 

// 2. den Vergleichsoperator bool operator— (const T, &const T& ) und 

// 3. den Ungleichoperator != 

// in einer Weise so dafi gilt: 

// (a) { TRUE } T a(b) {a == b} 

// (b) { TRUE } a = b {a == b} 

// (c) { a == a} 

// (d) { a == b <==> b == a } 

// (e) f (a == b) AND { b == c ) ==> (a == c) } 
// (f) { a != b <==> NOT { a== b) }; 

// 

// Aufierdem sind alle Funktionen, insbesondere getStatement equality preserving, d.h 

// (g) { a == b == > a . getStatement ( ) == b . getStatement ( ) } 

// 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-09-01 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

flifdef _KFGListHeader 

jteise 

tfdefine KFGListHeader 



^include <string> 
^include <iostream> 
^include <stdio.h> 
^include <list> 
^include <fstream> 
#include <iterator> 
ffinclude "KFGListNode . h" 
# include "KFGTokenList . h" 
#include "KFGProgList . h" 

using namespace std; 



class KFGListC : public 1 ist<KFGListNodeC> { 

int Anzahl_Defs, Anzahl_Uses, Anzahl_P_Uses , Anzahl_Deklarationen; 

int Schlei f enentscheidungen, Entscheidungen, Zaehlschlei f enentscheidungen; 

int Anweisungen; 

publ ic : 

KFGLi stC ( ) {}; 

void TokenList2KFGList ( KFGTokenListC & LI); 
void KnotenNummern ( ) ; 

void Knotenldentif izierer (KFGListC: : iterator KFG); 
void ListeAusgeben ( ) ; 
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void addLinelnToList ( ) ; 

void addLineToKFG(KFGProgListC & LP) ; 

int zaehleDeklarationen (KFGTokenListC & TL) ; 

void basisgroessenlnDatei ( ) ; 

}; 

class KFGDef ListC : public list<KFGDefC> {}; 
class KFGUseListC : public list<KFGUseC> {}; 
class KFGP_UseListC : public list<KFGUseC> {}; 
#endif 

^include <string> 
□ 

^include <iostream> 
ffinclude <list> 
#include "KFGNode . h" 

using namespace std; 

typedef list<KFGNodeC> KFGListeT; 
extern void KFGListeAusgeben (KFGListeT } ; 

////////////////////////////////////////////////////////////////////////////////////// 

// Klasse fur die Knoten im Kont rol 1 f lufigraph . 

// Diese Klasse erfullt die nice-Anforderungen fur die STL; 

// d.h. fur eine Klasse T gilt 

// 0. Sie unterstutzt den Copy-Konst ruktor T (const T& ) , 
// 1. den Zuweisungsoperator T& operator^ (const T& } , 

// 2. den Vergleichsoperator bool operator^ (const T, &const T& ) und 

// 3. den Ungleichoperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a(b) {a == b} 

// (b) { TRUE } a = b {a == b} 

// (c) { a == a} 

// (d) { a == b <==> b == a } 

// (e) { (a == b) AND ( b == c ) ==> ( a == c ) } 
// (f) { a ! = b <==> NOT ( a== b) }; 

// 

// AuBerdem sind alle Funktionen, insbesondere getStatement equality preserving, d 

// (g) { a == b == > a. getStatement ( ) == b . getStatement ( ) } 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-08-25 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

ffifdef _KFGNodeListHeader 

#else 

#define _KFGNodeListHeader 

ffinclude <string> 
^include <iostream> 
ffinclude <list> 
ffinclude "KFGUse.h" 
ff include "KFGDef. h" 



using namespace std; 

typedef char StringT (256]; 
typedef char CodeLineT ( 256 ] ; 
typedef enum 

i U? # ^^ L : EL ' IFC ' BTh ' ETh ' BE1 ' EE1 ' 0P ' DOWL ' DOWLC ' SWITCH, CASE, ENDCASE, BDEFA, EN DDE FA, RETURN 
AK; KFGNodeTypeT ; 

typedef enum {LOOP, THEN, ELSE, NONE } KnotenldentT; 
class KFGListNodeC { 
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protected: 
//private: 



public: 



static int DummyNodeNr; 
int NodeNr; 
int Level; 
int KnotenNr; 
int LineNr; 
StringT Statement; 
CodeLineT CodeLine; 
KFGNodeTypeT KFGNodeType; 
KnotenldentT Knotenldent 



list<KFGUseC> Uses; 
list<KFGDefC> Defs; 
list<KFGUseC> P Uses; 



KFGListNodeC ( ) 



--") ; 
NO; 

myNodeNr++ ; 
NONE; 



{ strcpy (Statement, " — unknown 

Level - 0; 
KFGNodeType = 

NodeNr = Dum- 

KnotenNr - 0; 
Knotenldent - 



ne, " — unknown — " ) ; }; 

KFGListNodeC (char _Statement [J, KFGNodeTypeT _KFGNodeType ) 
ment, Statement); 



LineNr = 0; 
strcpy (CodeLi- 



{ strcpy (State- 



_KFGNodeType; 
myNodeNr++ ; 

NONE; 

ne, " — unknown--"); }; 

KFGListNodeC ( char _Statement f), KFGNodeTypeT 

ment, _Statement); 

_KFGNodeType ; 
myNodeNr++; 

NONE; 

ne, " — unknown — n ) ; }; 

KFGListNodeC (char Statement [), KFGNodeTypeT 

_LineNr) 

ment, ^Statement ) ; 

_KFGNodeType; 
myNodeNr++; 

NONE; 
LineNr; 



Level = 0; 

KFGNodeType = 

NodeNr = Dum- 

KnotenNr = 0; 
Knotenldent — 

LineNr = 0; 
strcpy (CodeLi- 



_KFGNodeType , int _Level) 

{ strcpy (State- 
Level = _Level; 
KFGNodeType = 

NodeNr = Dum- 

KnotenNr = 0; 
Knotenldent = 

LineNr = 0; 
strcpy (CodeLi- 

_KFGNodeType, int _Level, int 
{ strcpy (State- 
Level = _Level; 
KFGNodeType = 

NodeNr = Dum- 

KnotenNr = 0; 
Knotenldent — 

LineNr - 
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strcpy {CodeLi- 

ne, " — unknown — n ) ; }; 

void setStatement (char _Statement []} 

{ strcpy .(State- 
ment, _Statement ) ;. }; 

void setCodeLine ( char _CodeLine []) 

{ strcpy (CodeLi- 

ne, _CodeLine); }; 

void setKFGKnotenNummer (int _KnotenNr) 

{ KnotenNr - 

_KnctenNr; } ; 

void setKnotenldent (KnotenldentT _KnotenIdent ) 

{ Knotenldent = 

_KnotenIdent ; }; 

int getKnotenNummer ( ) { return KnotenNr; }; 

char* getStatement ( ) { return Statement; }; 

char* getCodeLinet ) { return CodeLine; ); 

int getLevelO { return Level; }; 

int getNodeNrO { return NodeNr; }; 

int getLineNr() { return LineNr; }; 

KnotenldentT getKnotenldent { ) ( return Knotenldent; }; 

KFGNodeTypeT getKFGNodeType ( ) { return KFGNodeType; }; 

bool operator == (const KFGListNodeC& other) const 

{ return 

( {st rcmp( Statement, other . Statement ) == 0) 

& (Level == 

other . Level } 

& (KFGNodeType 

== other. KFGNodeType) 

& (NodeNr == 

other .NodeNr) ); }; 

bool operator != (const KFGListNodeCfi other) const 

^. i return ! (*this 

== other ) ; } ; 

bool operator < (const KFGLi stNodeC& other) const 

/ *. { return 

( strcmp ( Statement, other . Statement ) < 0); }; 

bool operator > (const KFGLi stNodeC& other) const 

/ { return 

( strcmp ( Statement, other . Statement ) > 0); }; 

friend ostreams operator « ( ostreami os, const KFGLi stNodeC& Node); 



#endif 

//#include <string> 
//#include <iostream> 
//^include "KFGList . h" 

//using namespace std; 



//class KFGListOpC : public KFGList eC { 
//public: 

// void KFGListOut (KFGListeT & L) 

// { 

// KFGListeT: : iterator I = L.begin(); 

// whiled != L.end( ) ) 
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// cout « *I++ « 1 '; 

// cout « " size() = " « L.size() « endl; 

// } 
//} ; 

5 

////////////////////////////////////////////////////////////////////////////////////// 
D 

// Klasse fQr Hilfsliste, um daraus einen KFG zu erstellen. 

10 □ 

// Diese Klasse erfttllt die nice-Anf orderungen fUr die STL; 
// d.h. fQr eine Klasse T gilt 

// 0. Sie unterstOtzt den Copy-Konst ruktor T (const T&), 

// 1. den Zuweisungsoperator T& operator- (const T& ) , 
15 // 2. den Vergleichsoperator bool operator— (const T, &const T& ) und 

// 3. den Ungleichoperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a(b) {a == b} 

// (b) { TRUE } a = b {a == b} 
20 // (c) { a == a} 

// (d) { a == b <==> b a } 

// (e) { (a == b) AND ( b == c ) ==> ( a == c ) } 
// (f) { a != b <==> NOT ( a== b) }; 

// AuBerdem sind alle Funktionen, insbesondere getName equality preserving, d.h. 

// (g) { a == b =- > a. getName () == b. getName () } 

// 

// (C) 1997 Siemens AG 

30 // /////////////////////////////////////////////////////////////////////////////////// 
// 1997-08-25 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

#ifdef _KFGNodeHeader 

#else 

35 ffdefine _KFGNodeHeader 

#include <string> 
^include <iostream> 



40 



45 



60 



65 



70 



75 



using namespace std; 

typedef char StringT [256]; 

class KFGNodeC { 
private : 

StringT Name; 
int ScopeLevel; 



50 public: 

KFGNodeC ( ) { st (N 

known — "J; ScopeLevel = 0; 

cc _ _ /* cout « "NodeC 

OO erzeugt" « endl ; */}; 

KFGNodeC ( char _Name [] ) { strcpy (Name, _Name); 

ScopeLevel =0; }; 

KFGNodeC ( char _Name [], int _ScopeLevel ) 



.Name); { Strcpy < Name ' 

.ScopeLevel;}; > ScopeLevel = 

void setNamefchar _Name []} { strcpy {Name, _Name ) ; }; 

char* getName () { return Narne; }; 

int getScopeLevelO { return ScopeLevel; }; 

bool operator == (const KFGNodeC& other) const 

( (strcmptName, other. Name) == 0) * return 

== other. ScopeLevel)); }; & (ScopeLevel 



bool operator != (const KFGNodeCi other) const 
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{ return ! (*this 

== other) ; } ; 

bool operator < (const KFGNodeC& other) const 

{ return { strcmp (Name, 

other. Name) < 0); }; 

bool operator > (const KFGNodeC& other) const 

{ return { strcmp ( Name, 

other. Name) > 0); }; 

friend ostream& operator « ( ostream& os, const KFGNodeCS Node); 

} ; 

#endif 

#ifdef _KFGNodelHeader 
□ 

#else 
□ 

////////////////////////////////////////////////////////////////////////////////////// 
// Klasse fUr Hilfsliste, urn daraus einen KFG zu erstellen. 
// Diese Klasse erfUllt die nice-Anf orderungen fur die STL; 
// d.h. far eine Klasse T gilt 

// 0. Sie unterstOtzt den Copy-Konstruktor T (const T&), 
// 1. den Zuweisungsoperator T& operator^ (const T& ) , 

// 2. den Vergleichsoperator bool operator== (const T, Sconst T&) und 

// 3. den Unglei choperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a(b) {a == b} 

// (b) { TRUE } a - b {a == b} 

// (c) { a == a} 

// (d) { a == b <==> b == a } 

// (e) { (a == b) AND ( b == c } ==> (a == c) } 
// (f) { a != b <==> NOT ( a== b) }; 

// 

// AuBerdem sind alle Funktionen, insbesondere getName equality preserving, d.h. 

// (g) { a == b == > a. getName () == b. getName () } 

// 

// (C) 1997 Siemens AG 

// 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-08-25 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

flifdef _KFGNodelHeader 

lelse 

^define _KFGNodelHeader 

^include <string> 
ffinclude <iostream> 

using namespace std; 

typedef char StringT [256); 

class KFGListNodeC { 
private : 

StringT Name; 
int ScopeLevel; 
list <KFGUseC> Uses; 
list <KFGDefC> Defs; 

public : 

KFGListNodeC ( ) , t u = ^ Q .. 

known -«); ScopeLevel = 0; 1 S trCPV {Nam6 ' Un " 

erzeugt- « endl ; V}; /+ C °' J1: <K " NodeC 

KFGListNodeC (char Jame [] ) { strcpy (Name, _Name ) ; 

ScopeLevel =0; } ; 

KFGListNodeC (char _Name [), int JcopeLevel) 
Name); { str ^PY (Name, 
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ScopeLevel = 

_ScopeLevel ; } ; 

void setName ( char _Name (]) { strcpy {Name, _Name ) ; }; 

char* getName ( ) { return Name; }; 

int getScopeLevel { ) { return ScopeLevel; }; 

bool operator == (const KFGListNodeC& other) const 

{ return 

{ (strcmp (Name, other. Name) == 0) 

& (ScopeLevel 

== other . ScopeLevel )) ; }; 

bool operator != (const KFGListNodeC& other) const 

{ return ! (*this 

== ether) ; } ; 

bool operator < (const KFGListNodeC& other) const 

( return ( strcmp (Name, 

other. Name) < 0); }; 

bool operator > (const KFGListNodeC& other) const 

{ return (strcmp (Name, 

other. Name) > 0); }; 

friend ostream& operator « ( ostream& os, const KFGLi stNodeC& Node); 

} i 

#endif 

ffifdef _KFGNodelHeader 
□ 

Seise 
□ 

////////////////////////////////////////////////////////////////////////////////////// 
□ 

// Klasse fur Hilfsliste, um daraus einen KFG zu erstellen. 
0 

// Diese Klasse erfOllt die nice-Anf orderungen fur die STL; 
// d.h. fOr eine Klasse T gilt 

// 0. Sie unterstUtzt den Copy-Konst ruktor T (const T& ) , 
// 1. den Zuweisungsoperator T& operator= (const T& ) , 

// 2. den Vergleichsoperator bool operator== (const T, ficonst T& ) und 

// 3. den Ungleichoperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a(b) {a == b} 

// (b) { TRUE } a = b {a == b} 

// ( C ) { a == a} 

// (d) { a == b <==> b == a } 

// (e) { (a == b) AND ( b == c ) ==> (a == c) } 
// (f) { a != b <==> NOT ( a== b) }; 

// 

// AuBerdem sind alle Funktionen, insbesondere getName equality preserving, d.h. 

//(g) { a == b == > a. getName () b - getName () } 

// 

// (C) 1997 Siemens AG 
// 

// /////////////////////////////////////////////////////////////////////////////////// 
// 1997-08-25 Andreas Steinhorst 

////////////////////////////////////////////////////////////////////////////////////// 

ffifdef _KFGNodelHeader 

#else 

#define _KFGNodelHeader 

ffinclude <string> 
#include <iostream> 

using namespace std; 

typedef char StringT (256]; 

class KFGListNodeC { 
private : 



StringT Name; 
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int ScopeLevel; 
list <KFGUseC> Uses; 
list <KFGDefC> Defs; 



public : 

KFGListNodeC { } { strcpy (Name, un- 

known — M ) ; ScopeLevel = 0; 



erzeugt" « endl ; */}; 



/* cout << w NodeC 



KFGListNodeC (char _Name [ ] ) { strcpy (Name, _Name ) ; 

ScopeLevel =0; } ; 

KFGListNodeC (char _Name [J, int _ScopeLevel ) 

{ strcpy (Name, 

_Name ) ; 

ScopeLevel = 

_ScopeLevel; } ; 

void setName{char _Name []) { strcpy (Name, _Name); }; 

char* getNamef) { ret urn Name; }; 

int getScopeLevel ( ) { return ScopeLevel; }; 

bool operator == (const KFGListNodeC^ other) const 
( (strcmpfName, other. Name) ==0} * return 

& (ScopeLevel 

other . ScopeLevel )) ; }; 

bool operator != (const KFGListNodeCfi other) const 

. K . . , { return !(*this 

== other ) ; } ; 

bool operator < (const KFGListNodeCfi other) const 
other. Name) < 0); }; { " tUrn ^^cmp^ara^ 

bool operator > (const KFGListNodeCfi other) const 
ether. Name) > 0); }; { retUrn ' st rcmp ( Name, 

^ friend ostream& operator « ( ostreami os, const KFGListNodeCS Node); 

#endif 

//Klasse fur eine Liste aus STL. KFGListeC erbt dabei alle Eigenscha f t en 
//von der mit STL erstellten Liste 1 ist<KFGNodeC> . 
ffifdef _KFGProgListHeader 
Seise 

#define _KFGProgListHeader 

#include <string> 

^include <iostream> 

^include <stdio.h> 

#include <list> 

^include <fstream> 

#include <iterator> 

iinclude "KFGLineNode . h" 

using namespace std; 

class KFGProgListC : public list<KFGLineNodeC> { 
public: 

KFGProgListC ( ) {}; 

//void KFGListeAusgeben ( ) ; 

//void KFGTokenListToKFGList (); 
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}; 

#endif 

//Klasse fQr eine Liste aus STL. KFGListeC erbt dabei alle Eigenschaf ten 
□ 

//von der mit STL erstellten Liste list<KFGNodeC> . 
□ 

ffifdef _KFGTokenListHeader 
□ 

#else 
□ 

#define _KFGTokenListHeader 
□ 

□ 

□ 

^include <string> 
□ 

#include <iostream> 
□ 

#include <stdio.h> 
#include <list> 
#include <fstream> 
^include <iterator> 
#include "KFGTokenNode . h" 

using namespace std; 

class KFGTokenListC : public list<KFGTokenNodeC> { 
public : 

KFGTokenListC < > {}; 

void KFGListeAusgeben ( ) ; 

//void KFGTokenLi stToKFGList (); 

\ - 
i * 

ffendif 

////////////////////////////////////////////////////////////////////////////////////// 

// Klasse fQr Hilfsliste, um daraus einen KFG zu erstellen 
□ 

// Diese Klasse erfUllt die nice-Anf orderungen ftir die STL; 
□ 

// d-h. fQr eine Klasse T gilt 

// 0. Sie untersttltzt den Copy-Konstruktor T (const T& ) , 
// 1- den Zuweisungsoperator T& operator= (const T&), 

// 2. den Vergleichsoperator bool operator== (const T, &const T& ) und 

// 3- den Ungleichoperator != 

// in einer Weise so daB gilt: 

// (a) { TRUE } T a (b ) {a == b} 

// (b) { TRUE } a = b {a == b} 

// (c) { a == a} 

// (d) { a == b <==> b == a } 

// (ej { (a == b) AND ( b == c ) ==> ( a == c) } 
//(f) { a != b <==> NOT ( a== b) }; 

// 

// AuBerdem sind alle Funktionen, insbesondere getName equality preserving d h 

// (g) { a == b == > a. getName () == b. getName () } 

// 

// (C) 199"7 Siemens AG 

// 

// """"'"^ 

// 199/-08-25 Andreas Steinhorst 

/////////////////////////////////////////////////////////////////////// 

#i f def _KFGTokenNodeHeader "/"////////////////// 
#else 

ffdefine KFGTokenNodeHeader 
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^include <string> 
#include <iostream> 

using namespace std; 

typedef char StringT [256]; 
typedef enum 

{N, PL, IF, BT, ET, BE, EE, FOR, BF, EF, WHILE, BW, EW, SW, CA, EGA, BRK, RET, DEFA, EDEFA, DO, BDOW, DOWS, NL, DEF 
, BFUNC, EFUNC, TD, OUT, FOR_D, PF} TokenNodeTypeT; 

class KFGTokenNodeC { 
private : 

StringT Name; 

TokenNodeTypeT TokenNodeType; 
int ScopeLevel; 
int LineNumber; 

publi c : 

KFGTokenNodeC ( } { strcpy (Name, " — un- 



known — " ) ; 



N; 



Name ) ; 



ScopeLevel = 0; 
TokenNodeType = 

LineNumber = 0; 

KFGTokenNodeC ( char _Name I], TokenNodeTypeT ^TokenNodeType ) 

{ strcpy (Name, 



ScopeLevel = 0; 

TokenNodeType = 

_TokenNodeType; 

LineNumber = 

0; } ; 

KFGTokenNodeC (char _Name [], int _ScopeLevel, TokenNodeTypeT _TokenNodeType ) 

{ strcpy (Name, 

_Name ) ; 

ScopeLevel = 

_ScopeLevel ; 

TokenNodeType = 

_TokenNodeType; 

^ ^ LineNumber = 0; 

KFGTokenNodeC ( char _Name [], int ScopeLevel, TokenNodeTypeT TokenNodeType. 
int _LineNumber) - 

{ strcpy (Name, 

_Name ) ; 

ScopeLevel = 

_ScopeLevel ; 

TokenNodeType = 

_TokenNodeType; 

, . , LineNumber = 

_LineNumber ; }; 

void setName(char _Name []) { strcpy (Name, _Name } ; }; 

char* getName() ( ret urn Name; }; 

int getScopeLevel ( } { return ScopeLevel; }; 

int getLineNumber ( ) { return LineNumber; }; 

TokenNodeTypeT getTokenNodeType ( ) { return TokenNodeType; }; 

bool operator == (const KFGTokenNodeC& other) const 

{ return 

( (strcmp (Name, other. Name) == 0) 

& (ScopeLevel 

== other . ScopeLevel ) 

rv ^ m , & (TokenNode- 

Type == other .TokenNodeType) ) ; }; 

bool operator != (const KFGTokenNodeC& other) const 



GR 99 P 1974 



37 

{ return ! (*t 

== other) ; } ; 

bool operator < (const KFGTokenNodeCfi other) const 

{ return 

( strcmp (Name, other. Name) < 0); }; 

bool operator > (const KFGTokenNodeC& other) const 

{ return 

{ strcmp (Name, other. Name) > 0); }; 

friend ostreams operator « ( ostreamfi os, const KFGTokenNodeC& Node); 

#endif 

ffifdef _KFGUseHeader 
□ 

#else 
□ 

#define _KFGUseHeader 
□ 

□ 

^include <string> 
□ 

^include <iostream> 
□ 

□ 

using namespace std; 
0 



□ 
□ 
□ 
□ 
□ 
□ 
□ 
□ 
□ 
□ 



typedef char StringT [256]; 

class KFGUseC { 
private : 

StringT Use; 
int ScopeLevelU; 

public: 



KFGUseCO { strcpy (Us6f unknown — 

ScopeLevelU = 0; }; 

KFGUseC (char _Use [], int _ScopeLevelU ) 

{ strcpy (Use, _Use); 

« . , „ ScopeLevelU - 

_ScopeLevelU; } ; 

void setUsefchar _Use []) { strcpy (Use, _Use); } 

char* getUset) { return Use; } 

int getScopeLevelU( ) { return ScopeLevelU; } 

bool operator == (const KFGUseC& other) const 

other. Use) == 0) { return ( (strcmp (Use, 

LevelU == othe r . ScopeLevelU )) ; }; & (Scop 

bool operator != (const KFGUseCfi, other) const 
other); }; { "turn ' (*this == 
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bool operator < {const KFGUseC& other) const 

{ return ( strcmp ( Use, 

other. Use) < 0); ); 

bool operator > (const KFGUseCfi other) const 

{ return ( strcmp ( Use, 

other. Use) > 0); }; 

friend ostreamS operator « { ostreamfi os, const KFGUseC& Node}; 

}; 

tfendif 

#ifndef _uwggraphC 
O 

ffdefine _uwggraphC 
□ 

□ 

ffinclude <Graph.h> 
□ 

ff include "uwgknoten . h M 
□ 

ffinclude "uwgkante.h" 
□ 

ffinclude M AS_Slice . h" 
using namespace std; 

class uwggraphC : public Graph < uwgknotenC, uwgkanteC > { 
public: 

short int eingefaltet; 
uwggraphC { ) { } ; 

SliceC: : iterator f indOutputNode ( SliceC & SI); 

Sliced : iterator def inelterator (SliceC & SI, int SliceNr); 

void addFirstNodesToFT (SliceC & SI, int KnotenNr, int Posl); 

SliceC: : iterator returnCondNode ( SliceC & SI, int SliceNr); 

int checkUWGNode ( int SliceNr); 

void SliceAusgeben ( SliceC & SI); 

void startBuildFT (SliceC & SI); 

void buildlnLoopTree (SliceC & SI, int Posl, SliceC: : iterator SLPUSE, Sli- 
ceC :: iterator SLNODE ); 

void buildIn_Dl_Part (SliceC & SI, int posOR Dl, SliceC: : iterator SLPUSE, 
SliceC: : iterator SLNODE, int D2_RefNr); ~~ 

SliceC: : iterator findOutmostPUse ( SliceC & SI, SI iceC :: iterator SLPUSE); 

int checkPUsesl (SliceC & SI, SliceC :: iterator SLPUSE, SliceC -iterator 
SLPUSEREF); -l u«i * .or 

int checkPUses2 (SliceC & SI, SliceC :: iterator SLPUSE, SliceC: : iterator 

SLPUSEREF); 

SliceC: : iterator find_Dl Node (SliceC & SI, SliceC: : iterator SLPUSE, Sli- 
ceC :: iterator SLNODE); 

void addAUDlNodes (SliceC & SI, SliceC :: iterator SLNODE, int posGatter, int 

SliceC: : iterator f indLastPUse ( SI i ceC & SI, int SliceNr); 

SliceC: iterator findLastPUse2 ( SliceC & SI, int SliceNr, int RefNr); 
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void checkLoopOrCond (SliceC & SI, Sliced : iterator SL1, SliceC: : iterator 
SLORIG, int Posil); 

void buildIn_D2_Part (SliceC & SI, int posOR_D2, SliceC: : iterator SL1, Sli- 
ceC: : iterator SLPUSE, int KnotenNrD2); 

int findD2Node (SliceC & SI, SliceC: : iterator PUSE); 

int buildlnlfTree (SliceC & SI, SliceC :: iterator SLIF, SI i ceC: : iterator 
SLORIG, int posl); 

SliceC: : iterator lookForNextPUse (SliceC & SI, SliceC: : iterator SNODE, Sli- 
ceC: : iterator SLPUSE); 

void build_IFKF_Part (SliceC & SI, int posKFOR, SliceC: : iterator SLPUSE); 

void build_Al_Part (SliceC & SI, int posIFDFOR, SliceC: : iterator SLIF, Sli- 
ceC :: iterator SLORIG); 

void buildD2_IFKF_Part (SliceC & SI, int posKFOR, SliceC :: iterator SLPUSE); 

void buildD2_Al_Part (SliceC & SI, int posIFDFOR, SliceC :: iterator SLIF, Sli- 
ceC: : iterator SLNODE); 

int buildD2InIfTree(SliceC & SI, SliceC: : iterator SLIF, SliceC: : iterator 
SLORIG, int posl); 

void buildLoopKF_Part (SliceC & SI, int posAND KF, int posLOOP KF, int posD2, 
SliceC: : iterator SLOOP); ~~ - 

int buildIn_LoopKF_ANDPart (SliceC & SI, int posAND KF, SliceC: : iterator 
SLPUSE); ~ 

void buildIn_LoopKF_ORPart( SliceC & SI, int posAND KF, SliceC: : iterator SL1, 
int KnotenNrD2); ~ 

}; 

#endif 

#ifndef _uwgkanteC 
#define _uwgkanteC 

^include <iostream> 

using namespace std; 

class uwgkanteC { 

public : 

short int eingefaltet; 
int Number; 

uwgkanteC ( ) { j . 

uwgkanteC (int _Number) { Number = _Number; }; 

bool operator == (const uwgkanteCS other) const 
== other. Number); }; { retUrn < Nu «*>" 

bool operator != (const uwgkanteCS other) const 
„ other); }; ( return M*thia 

bool operator < (const uwgkanteCS other) const 
== ether. Number); }; { return |Number 

bool operator > (const uwgkanteCS other) const 
== other. Number); }; { ret ' jrr ' (Number 

friend ostream& operator « ( ostream& os, const uwgkanteCS Node); 

#endif 
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#ifndef _uwgknotenC 
O 

#define _uwgknotenC 
□ 

□ 

#include <iostream> 

const int maxKnotentextLength=128; 
const int maxBemerkLength=1000; 
const int maxWahrVarLeng;th=16; 

typedef struct ww f 

short int Wert; 
struct ww *next; 
} TMCSWert; 

typedef struct el { 

struct ftgatter* unabElement ; 
struct ww *next; 
struct el *nextel; 
} TMinSet; 

typedef enum {AND, OR, CAUSE, EFFECT, NOT} NodeldentT; 
using namespace std; 
class uwgknotenC { 
public : 

static int DummyNr; 
int Gatterldent ; 
int outof; 
int CauseNr; 

char gattertext [maxKnotentextLength ] ; 
char gatterbemerkung [maxBemerkLength] ; 
double wahrsch; 

char wahrvar [maxWahrVarLength] ; 
NodeldentT Nodeldent; 

uwgknotenC () { Nodeldent = EFFECT; 

CauseNr = 0; 
strcpy (gatter 

text, unknown — " ) ; * 

w , , . tIl strcpy (gatter 

bemerkung, " — keine — " ) ; 

Gatterldent = 

DummyNr++; }; 

uwgknotenC (NodeldentT _NodeIdent ) 

» , » — , { Nodeldent = 

_NodeIdent ; 

CauseNr = 0; 

strcpy (gattertext, " — unknown — "); 
strcpy (gatterbemerkung, " — keine — " ) ; 

DummyNr++; }; Gatterldent = 

uwgknotenC (NodeldentT _NodeIdent, int _CauseNr/*, char _gattertext ( ] */ ) 

m^„t,j { Nodeldent = 

_NodeIdent; 

r, kl CauseNr - 

_CauseNr ; 

strcpy (gattertext, M — unknown — 
strcpy (gatterbemerkung, "--keine — " ) ; 
/* strcpy (gattertext, _gattertext ) ; */ 

DummyNr ++ ; }; Gatterldent = 
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uwgknotenC (NodeldentT _NodeIdent, int ^CauseNr, char _gattertext [) , char 
_gatterbemerkung [ ] ) 

{ Nodeldent - 

_NodeIdent; 

CauseNr = 

_CauseNr; 

strcpy (gattertext, " — unknown — w ) ; 

strcpy { gattertext, _gattertext ) ; 

strcpy (gatterbemerkung, ^gatterbemerkung ) ; 

Gatterldent = 

DummyNr++; }; 

uwgknotenC (NodeldentT ^Nodeldent, int _CauseNr, char _gattertext [ ] ) 

{ Nodeldent = 

_NodeIdent; 

CauseNr = 

_CauseNr ; 

/♦strcpy (gat- 
tertext, M — unknown — ");*/ 

strcpy (gattertext, _gattertext) ; 

strcpy (gatterbemerkung, " — keine — M ) ; 

Gatterldent = 

DummyNr++; } ; 

uwgknotenC (NodeldentT _NodeIdent, char _gattertext [ } , char 
_gatterbemerkung I ] ) 



_NodeIdent ; 

strcpy (gattertext, _gattertext) ; 

strcpy (gatterbemerkung, ^gatterbemerkung) ; 

DummyNr++; } ; 

uwgknotenC (NodeldentT _NodeIdent, char _gattertext ( ] ) 

_NodeIdent; 

strcpy (gattertext, _gattertext) ; 
strcpy (gatterbemerkung, " — keine — " ) ; 
DummyNr++ ; } ; 



{ Nodeldent. - 
CauseNr = 0; 

Gatterldent = 

{ Nodeldent = 
CauseNr = 0; 

Gatterldent = 



int getCauseNrO { return CauseNr; }; 

int getGatterldent ( ) { return Gatterldent; }; 

NodeldentT getNodeldent ( ) const { return Nodeldent; } 

bool operator == (const uwgknotenCS other) const 
seNr == other . CauseNr ) 
other .Nodeldent ) 

(strcmp (gattertext, other . gattertext ) 0) 
dent == other . Gatterldent )*/) ; }; 

bool operator != (const uwgknotenC& other) const 
== other) ; ) ; 

bool operator < {const uwgknctenC& other) const 
rldent < other . Gatterldent ) ; }; 

bool operator > (const uwgknctenC& other) ccnst 



{ return ( (Cau- 
& (Nodeldent == 
& 

/*& (Gatterl- 
{ return ! ( *this 
{ return (Gatte- 
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{ return (Gatte- 

rldent > other . Gatterldent ) ; }; 

friend ost reams operator << ( ostream& os, const uwgknotenCS Node); 



#endif 

^include "AS_GraphKante . h" 

□ 

^include <iostream> 

©streams operator « ( ostreami os, const GraphKanteC & Kante) { 
os « Kante . KantenTyp; 
return os; 

} 

ffinclude "AS_GraphNode . h" 
□ 

ffinclude <iostream> 
□ 

□ 

ostream& operator « ( ostream& os, const GraphNodeCfi Node){ 

□ 

os « endl « Node.NodeNr; 
return os; 

} 

ffinclude "AS_Slice . h" 
□ 

ffinclude <iostream> 
□ 

ffinclude <iterator> 
□ 

ffinclude <algor ithm> 
□ 

ffinclude "uwggraph . h" 
□ 

□ 

using namespace std; 
□ 



□ 

//FO: Funktion zur Auswahl der Variable, fur die ein Fehlerbaum erstellr werden soil 
□ 

// Zuruckgegeben wird ein Zeiger auf den ausgewShlten Knoten. 
KFGListC: : iterator SliceC : : def ineVariableToSl i ce < KFGListC & L2 ) { 
int Number = 0; 

KFGListC: : iterator KFGI = L2.begin{); 
KFGListC: : iterator VARDEFI = L2.begin(); 
KFGUseListC: : iterator USEIT; 
while ( KFGI != L2.end{)) { 

USEIT = KFGI->Uses. begin () ; 

if ( KFGI->getKFGNodeType ( ) == OP ) { 

cout « KFGI->getKnotenNummer ( ) « ": " << USEIT->getUse ( ) << 



endl ; ; 



endl ; 



} 

KFGI++; 

} 

cout « "Geben Sie die Knotennummer ein und drucken Sie RETURN: "; 
cin » Number; 

while ( KFGI != L2.begin(J) { 

if (KFGI->getKnotenNummer { ) =- Number) { 
VARDEFI = KFGI; 

} 

KFGI — ; 

} 

if t VARDEFI->getKFGNodeType ( ) OP) { 

cout « "Ausgewahlt wurde Knoten Nr.: " « VARDEFI ->getKnotenNummer ( ) « 
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return VARDEFI; 

} 

else { 

. VARDEFI = L2.begin(); 

cout « "Dieser Knoten ist kein Ausgabeknoten, das Programm wird beendet. 

« endl; 

exit {1 ) ; 
return VARDEFI; 

} 

} 



//Fl: Sucht P-Use Knoten, ftlgt ihn dem Slice hinzu und zieht eine KFK. 

// input: Iterator auf den C-Use oder D-Use, KFG-Liste; 

void SliceC: : sli ceForLoops ( KFGListC & L2, KFGListC :: iterator LOOPIT) { 

int HLevel; 

int check - 0; 

int KnotenNummer = 0; 

KFGListC: : iterator HELPIT = LOOPIT; 

while { (LOOPIT->getKFGNodeType { ) != LC && LOOPIT- >getKFGNode Type ( ) != IFC) || 
( LOOPIT->getLevel { ) ! = HELPIT->getLevel ( ) ) ) { 
LOOPIT — ; 

} 

KnotenNummer = LOOPIT->getNodeNr { ) ; 
check = checkForNodes {KnotenNummer ) ; 
//insert ( + LOOPIT, * HELPIT, KFK ) ; 

insert ( *HELPIT, *LOOPIT, KFK) ; //umgekehrte Richtung der Kante, damit jeder Knoten 
seine VorgSnger kennt. 

//cout « "eingef CgterKnotenFla : " « LOOPIT->getNodeNr { } « endl; 

//cout « "eingefUgterKnotenFla: " « HELPIT->getNodeNr ( ) « endl « endl; 

if (check ==0) { 

findAHDefs (L2, LOOPIT); 

} 

HLevel = LOOPIT->getLevel { ) ; 
while (LOOPIT->getLevel ( ) > 2) { 

check == 0; 

HELPIT = LOOPIT; 

while ( (LOOPIT->getKFGNodeType ( ) != LC && LOOFIT->getKFGNodeType ( ) '= IFC) 
II ( LOOPIT->getLevel ( } >= HELPIT->ge tLevel { ) ) ) { 
LOOPIT — ; 

} 

KnotenNummer = LOOPIT->getNodeNr { ) ; 
check = checkForNodes (KnotenNummer ) ; 
//insert (+LOOPIT, * HELPIT, KFK) ; 

insert ( *HELPIT, * LOOPIT, KFK) ; //umgekehrte Richtung der Kante, damit jeder 
Knoten seine Vorganger kennt. 

//cout « "eingefOgterKnotenFlb: " « LOOPIT->getNodeNr ( ) « endl; 

//cout « "eingefOgterKnotenFlb: " « HELPIT->getNodeNr ( ) « endl « endl; 

if (check == 0) { 

f indAHDefs (L2, LOOPIT); 

} 

HLevel = LOOPIT->getLevel ( ) ; 

} 

} 



//F2: Sucht alle D-Uses zu einem P-Use, fOgt diese dem Slice hinzu und zieht DFK. 
// input: Iterator auf den Knoten mit der P-Use Liste, KFG-Liste; 
void SliceC: : findAHDefs (KFGListC & LI, KFGListC :: iterator ITER ) { 

int AktLevel; 

int dummylf = 0; 

int KnotenNummerEnde = 0; 

AktLevel = ITER->getLevel ( ) ; 

KFGListC: : iterator HELPIT = ITER; 

KFGListC: : iterator HELFIF = ITER; 

KFGListC: : iterator HE LP LOOP = ITER; 

KFGListC: : iterator UPPERLIMIT = ITER; 

KFGP_UseListC: : iterator PUSEIT; 

PUSEIT = ITER->P_Uses. begin ( ) ; 

KFGDefListC: : iterator DEFIT1; 

if ( ITER->getKFGNodeType ( } == LC) { 

while ( ( HELPLOOP->getKFGNodeType ( ) !=EL) I I ( HELPLOOP->getLevel ( ) Akt- 
Level ) ) { 

HELPLOOP++; 

} 

HELPIT = HELPLOOP; 

KnotenNummerEnde = HELPLOOP->getNodeNr ( ) ; 
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while (PUSEIT != ITER->P_Uses . end ( ) ) { 

UPPERLIMIT = findUpperLimit (LI, ITER, PUSEIT); 
HELPLOOP = find Lower Limit ( LI , ITER, UPPERLIMIT); 
/ /insert ( *UPPERLIMIT, * ITER, DFK ) ; 

insert ( *ITER, *UPPERLIMIT, DFK) ; //umgekehrte Richtung der Kante, damit jeder 
Knoten seine Vorganger kennt. 

//cout « M eingefugterKnotenF2a: " « UPPERLIMIT->getNodeNr { } « endl; 
//cout « n eingefugterKnotenF2a: " « ITER->getNodeNr ( ) « endl; 
while (HELPLOOP != UPPERLIMIT) { 
HELPLOOP — ; 

if (HELPLOOP->getKFGNodeType( ) == EE1 ) { 
dummy I f = 1 ; 

} 

if { (HELPLOOP->getKFGNodeType( } == ETh) && ( HELPLOOP->getLevel ( ) < 
ITER->getLevel ( ) ) && (dummylf ==0)) { 

HELPIF = HELPLOOP; 

while ( { HELPLOOP->getKFGNodeType ( ) != IFC) || (HELPLOOP- 
>getLevel() != HELPI F->getLevel ( ) ) ) { 

HELPLOOP — ; 

} 

dummyl f = 0 ; 

} 

if (HELPLOOP->getKFGNodeType( ) =^NO) { 
DEFIT1 = HELPLOOP->Defs. begin ( ) ; 
while (DEFIT1 ! = HELPLOOP->Def s . end ( ) ) { 

if (strcmp(PUSEIT->getUse ( ) , DEFITl->getDef ( ) ) == 0) { 
//insert (*HELPLOOP, *ITER, DFK) ; 

insert { *ITER, *HELPLOOP, DFK) ; //umgekehrte Rich 
tung der Kante, damit jeder Knoten seine Vorganger kennt. 

def InLoop (LI, HELPLOOP) ; 

//cout « "eingefugterKnotenF2b: " « HELPLOOP 



>getNodeNr() « endl; 
>getNodeNr() « endl « endl; 



//cout « M eingefugterKnotenF2b: n « ITER- 

if ( !HELPLOOP->Uses. empty () ) { 

f indDefToCUse (LI, HELPLOOP); 



} 

DEFIT1++; 

} 

} 

} 

PUSEIT++; 

} 

KFKPUseToCUse (ITER, KnotenNumme rEnde ) ; 



//F5: Funktion sucht den ersten def oberhalb eines p-uses oder c-uses und 
// liefert einen Iterator auf diese obere Grenze bei der Suche aller defs 
// zurtlck. 

KFGListC: : iterator Sliced : findUpperLimit (KFGListC & LI, KFGListC: : iterator ITER 
KFGF_UseListC: : iterator PUSEIT) { ' 

int dummy = 0; 

int dummyl = 0; 

int dummylf = 0; 

int AktLevel = 0; 

KFGListC: : iterator HELPDEF = ITER; 
KFGListC: : iterator HELPLOOP = ITER; 
KFGListC: : iterator HELPIF = ITER; 
KFGListC: : iterator HELPIT = ITER; 
KFGListC: : iterator HELPDE FRETURN = ITER; 
KFGDefListC: : iterator DEFIT; 
AktLevel = ITER->getLevel ( ) ; 

//finden des ersten defs oberhalb des p-use . 
while ((HELPDEF != Ll.beginO) && (dummy ! *= ' 1 ) ) 
HELPDEF — ; 

if (HELPLOOP->getKFGNodeType ( ) == EE1 ) { 
dummyl f = I ; 

} 

^ , T wii if ( ( HELPDEF->getKFGNodeType ( ) == ETh ) &fi ( HELPDEF->get Level ( ) < ITER- 
>getLevel()) && (dummylf == 0)) { ; 

HELPIF = HELPDEF; 

HELFI F->getLevel ( ) ) ) ' ' ^^^PDEF->getKFGNodeType ( ) !=IFC, I, ( HELPDEF->getLevel ( ) ! = 

HELFDEF— ; 
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dummylf = 0; 

} 

if (HELPDEF->getKFGNodeType ( ) == NO) { 
DE FIT = HELPDEF->Defs. begin { ) ; 

if (strcmp(DEFIT->getDef ( ) , PUSEIT->getUse ( ) ) ==0) { 
HELPDEFRETURN = HELPDEF; 
dummy = 1; 

} 

} 

} 

if ({HELPDEF == Ll.beginO) && ( HELPDEF->getKFGNodeType () == NO) ) { 
DEFIT = HELPDEF->Def s. begin ( ) ; 

if (strcmp(DEFIT->getDef ( ) , PUSEIT->getUse { ) ) ==0) { 
HELPDEFRETURN « HELPDEF; 
dummy =1; 

} 

} 

//finden der auBersten Schleife, falls diese Qberhaupt existiert. 
if (ITER->getLevel ( ) > 2) { 

while ({HELPIT != LI . end { ) ) && (dummyl != 1)) { 
HELPIT++; 

if ( (HELPIT->getKFGNodeType( } EL) && ( HELPIT->getLevel ( ) < Akt- 



HELPLOOP » HELPIT; 

if (HELPIT->getLevel ( ) > 2) { 

AktLevel = HELPIT->getLevel ( ) , 

} 

else { 



} 



} 



dummyl = 1; 



} 

HELPIT = HELPLOOP; 

//gene zum Anfang der auBersten Schleife: 

while ( (HELPIT->getKFGNodeType( ) LC) || ( HELPIT->getLevel { ) != HELPLOOP- 

>getLevel ( ) ) ) { 

HELPIT — ; 

} 

//wenn der gefundene def-Koten auBerhalb der auBersten Schleife liegt, und 
//sein ScopeLevel grOBer ist als das der auBersten Schleife, suche, ob es 
//noch einen weiteren def-Knoten weiter oben gibt. 
if (HELPDEF->getNodeNr ( ) > HELPIT->getNodeNr ( } ) { 

if (HELPDEF->getLevel { } >= HELPIT->getLevel ( ) ) { 
dummy = 0; 

while { (HELPDEF != Ll.beginO ) && (dummy != 1)) { 
HELPDEF — ; 

DEFIT = HELPDEF->Defs.begin(); 

if (strcmp(DEFIT->getDef O , PUSEIT->getUse( ) ) == 0) { 
HELPDEFRETURN = HELPDEF; 
dummy = 1 ; 

} 

} 

} 

} 

} 

return HELPDEFRETURN; 



//F6: Funktion sucht, abhangig vom oberen Ende, das untere Ende des Bereichs, indem 
// die defs gesucht werden mUssen. 

// Zuruckgelief ert wird ein Iterator auf die untere Grenze. 

KFGListC: : iterator SliceC: : f indLowerLimit ( KFGListC & LI, KFGListC: : iterator ITER 
KFGListC: : iterator UPPERLIMIT) { ' 

int dummyl = 0; 

int AktLevel = 0; 

KFGListC: : iterator HELPIT - ITER; 
KFGListC: : iterator HELPLOOP = ITER; 
KFGListC: : iterator LOWERLIMIT = ITER; 
AktLevel = ITER->getLevel ( ) ; 
if (ITER->getKFGNodeType() == LC) { 

while ( ( HELPLOOP->getKFGNodeType ( ) !=EL) It ( HELPLOOF->get Level O != Akt- 
Level ) ) { 

HELPLOOP++; 

} 

} 

//finden des Endes der Sufiersten Schleife. 
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if (ITER->getLevel ( ) > 2) { 

while ( (HELPIT LI . end ( ) ) && (dummyl != 1}) { 
HELPIT++; 

if ( (HELFIT->getKFGNodeType( ) «EL> && < HELPIT->getLevel ( ) < Akt- 

Level ) ) { 

HELPLOOP = HELPIT; 

if (HELPIT->getLevel ( J > 2) { 

AktLevel = HELPIT->getLevel ( ) ; 

} 

else { 

dummyl = 1 ; 

} 

} 

} 

HELPIT = HELPLOOP; //HELPLOOP zeigt auf das Ende der Su- 

Bersten Schleife, ansonsten auf den p-use. 

while { (HELPIT->getKFGNodeType ( ) LCJ II (HELPIT->getLevel ( ) != HELPLOOP- 

>getLevel ( } ) ) { 

HELPIT--; 

} //HELPIT zeigt auf den 

Anfang der aufiersten Schleife. 

if (HELPIT->getNodeNr ( ) < UPPERLIMIT->getNodeNr { ) ) { 

LOWERLIMIT = HELPLOOP; // falls die obere Grenze aufierhalb der Schlei 



fen liegt. 



AktLevel ) } { 



liegt . 



} 

else { 

AktLevel ~ UP PERLIMIT->get Level ( ) ; 

while ( (HELPLOOP->getKFGNodeType( ) != EL) || { HELPLOOF->getLevel ( ) < 
HELPLOOP — ; 

} 

LOWERLIMIT = HELPLOOP; // falls die obere Grenze innerhalb der Schleif 

} 

else { 

LOWERLIMIT = HELPLOOP; 

} 

return LOWERLIMIT; 



//F3: Funktion zieht eine KFK vom F-Use zu alien C-Uses, die sich in derselben 
// Schlei fen- bzw. Verzweigungsebene befinden. 
// input: Iterator auf P-Use Knoten. 

void SI i ceC: : KFKPUseToCUse ( KFGListC : : iterator PUSEIT, int Schlei fenEnde ) { 
SliceC: : iterator SL1 = begin () ; 
SliceC: : iterator SLHELP = begin () ; 
KFGListC: : iterator ITER = PUSEIT; 
KFGUseListC: : iterator USEIT; 
KFGP_UseListC: : iterator PUSEIT2; 
KFGUseListC: : iterator CUSEIT2; 
int KnotenLevel; 
int KnotenNummer ; 

KnotenNummer = PUSEIT->getNodeNr ( ) ; 
KnotenLevel = PUSEIT->getLevel ( } ; 

while ( (*SL1) .first. getNodeNr( ) != KnotenNummer) 

SL1++; 
SLHELP « SL1; 
SL1 = begin ( ) ; 
while (SL1 != end( ) ) { 

if ((KnotenNummer > ( *SL1 ) . f i rst . getNodeNr ( ) ) && ( Schlei fenEnde < 
(*SL1) . first. getNodeNr ( ) ) ) { 

f if (( (*SL1) .first. getKFGNodeType{) ==NO) && ( ( *SL1 ) . f i rst . getLevel { ) 
== KnotenLevel ) ) { 

//insert( ( *SLHELP ) .first, (*SL1) .first, KFK); 
tnnn Hor , , . ^ . M „ insert ( (*SL1 ) .first, ( * SLHELP) . first, KFK) ; //umgekehrte Rich- 
tung der Kante, damit ]eder Knoten seine Vorganger kennt. 

//cout « "eingef QgterKnotenF3: " « 
( *SL1 ). first . getNodeNr ( ) « endl; 

//cout « "eingef ugterKnotenF3 : " « 
( * SLHELP ) . f i rst . getNodeNr ( ) « endl; 

} 

} 

SL1++; 

} 
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//F4: Funktion sucht, wenn der Knoten neben den defs noch c-uses enthait, zu diesen 
// c-uses alle defs und zieht DFK vom gefundenem def zum c-use. 
void SliceC: : f indDef ToCUse (KFGListC & LI, KFGListC: : iterator ITER) { 

int HLevel; 

int check - 0; 

int dummy = 0; 

int dummylf = 0; 

int KnotenNummer = 0; 

KFGListC: : iterator HELPIT = ITER; 

KFGListC: : iterator HELPLOOP = ITER; 

KFGListC: : iterator HELPIF = ITER; 

KFGListC: : iterator LOWERLIMIT = ITER; 

KFGListC: riterator UPPERLIMIT = ITER; 

KFGDefListC: : iterator DEFIT1; 

KFGUseListC: : iterator USEIT1; 

USEIT1 = ITER->Uses. begin < ) ; 

HLevel = ITER->getLevel ( ) ; 

while (USEIT1 != ITER->Uses . end ( ) ) { 

UPPERLIMIT = findUpperLimitFromCUse (LI, ITER, USEIT1 ) ; 
HELPIT - findLowerLimitFromCUse (LI, ITER, UPPERLIMIT); 
UPPERLIMIT — ; 

//cout « n eingefUgterKnotenF4a: H « UPPERLIMIT->getNodeNr ( ) « endl; 
//cout « "eingeftlgterKnotenF4a : " « ITER->getNodeNr ( ) « endl; 
while (HELPIT != UPPERLIMIT) { 

if (HELPLOOP->getKFGNodeType( ) EE1 ) { 
dummylf - 1; 

} 

if ( ( HELPIT->getKFGNodeType ( ) == ETh ) && ( HELPIT->getLevel ( ) <= ITER- 
>getLevel ( ) ) && (dummylf ==0)) { 

HELPIF = HELPIT; 

while ( (HELPIT->getKFGNodeType ( ) != IFC) || (HELPIT- 
>getLevel() != HELPI F->getLevel ( ) ) ) { 

HELPIT--; 

} 

dummylf = 0; 

} 

if (HELPIT->getKFGNodeType ( ) == NO) { 
DEFIT1 = HELPIT->Defs. begin ( ) ; 

if (strcmp (DEFITl->getDef ( } ,USEITl->getUse ( ) ) == 0) { 
if ( !HELPIT->Uses. empty ( ) ) { 

KnotenNummer = HELPIT->getNodeNr ( ) ; 
check = checkForNodes (KnotenNummer ) ; 

} 

//insert (*HELPIT, *ITER, DFK) ; 

insert ( *ITER, *HELPIT, DFK) ; //umgekehrte Richtung der 
Kante, damit jeder Knoten seine Vorganger kennt. 

def InLoop ( LI , HELPIT ) ; 

//cout « M eingef0gterKnotenF4b: " « HELPIT- 

>getNodeNr() « endl; 

//cout « "eingefagterKnotenF4b: " « ITER- 

>getNodeNr() « endl « endl; 

if (check == 0) { 

f i ndDe f ToCUse ( LI , HELPIT J ; 

} 

} 

} 

HELPIT—; 

} 

USEIT1++; 

} 

} 



//F8: Funktion sucht die untere Grenze, von der an die defs zu einem c-use gesuchr 
// werden dtlrfen. 

KFGListC: : iterator SliceC: : f indLowerLimi t FromCUse (KFGListC & LI, KFGListC* 'iterator 
KFGListC: : iterator UPPERLIMIT) { 

int HLevel; 

int dummy = 0; 

KFGListC: : iterator HELPIT « ITER; 
KFGListC: : iterator HELPLOOP = ITER; 
KFGListC: : iterator LOWERLIMIT = ITER; 
KFGDefListC: riterator DEFIT1; 
KFGUseListC: : iterator USEIT1; 
USEIT1 = ITER->Uses .begin () ; 
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HLevei = ITER->getLevel ( ) ; 

//Ist der c-use Knoten in einer Schleife? 
if (ITER->getLevel{ ) >= 2 ) { 

while ( (HELPIT LI . end { ) ) && {dummy != D) { 
HELPIT++; 

if ( (HELFIT->getKFGNodeType ( ) == EL) && ( HELPIT->getLevel { ) <>= 

HLevei) ) { 

HE LP LOOP = HELPIT ; 
if (HELPIT->getLevel ( ) > 2} { 
HLevei — ; 

} 

else { 

dummy = 1; 

} 

} 

} 

} 

//Der Iterator HELPLOOP zeigt jetzt auf das Ende der auBersten, den Knoten umgeben- 

den 

//Schleife, falls es diese gibt, ansonsten zeigt der Iterator auf den c-use-Knoten 

selbst . 

if (HELPLOOP != ITER) { 

HELPIT = HELPLOOP; //Iterator zeigt auf das Ende der auBersten 

Schleife. 

while ( {HELPIT->getKFGNodeType { ) != LC) || (HELPIT->getLevel ( ) != HELPLOOP- 

>getLevel ( ) ) ) { 

HELPIT-- ; 

} 

if (HELPIT->getNodeNr ( ) < UPPERLIMIT->getNodeNr ( ) J { 

LOWERLIMIT = HELPLOOP; //obere Grenze auBerhalb der auBersten Schlei- 



fe; 



ben Schleife; 



} 

else if (ITER->getLevel ( ) == UPPERLIMIT->getLevel ( ) ) { 

LOWERLIMIT = ITER; //obere Grenze mit dem c-use in dersel 

} 

else if {ITER->getLevel ( ) < UPPERLIMIT->getLevel ( ) ) { 

LOWERLIMIT = HELPLOOP; //obere Grenze in derselben auBeren Schleife 

aber 

} //innerhalb in einer 

anderen, vor dem c-use liegenden Schleife; 
else { 

HLevei = UPPERLIMIT->get Level ( ) ; 

while ( (HELPLOOP->getKFGNodeType( ) !-EL) || ( HELPLOOP->get Level ( ) < 

HLevei ) ) { 

HELPLOOP — ; 

} 

LOWERLIMIT = HELPLOOP; //obere Grenze in einer niedrigeren Schleife 

als der c-use; 

} 

} 

else { 

^ LOWERLIMIT = ITER; //keine auBere Schleife vorhanden. 

return LOWERLIMIT; 

} 

//F7: Funktion sucht die obere Grenze, bis zu der defs zu einem c-use gesucht werden 
// dUrfen. Die Funktionsweise ist ahnlich entsprechenden Funktion fur p-uses. 
KFGListC: : iterator SliceC: : f indUpperLimi tFromCUse (KFGListC & LI, KFGLisfC :: i terror ITER1 
KFGUseListC: : iterator USEIT) { ' 

int dummy = 0; 

int dummyl = 0; 

int dummyl f = 0; 

int AktLevel = 0; 

KFGListC: : iterator HELPDEF = ITER1; 
KFGListC: : iterator HELPLOOP = ITER1; 
KFGListC: : iterator HELPIT = ITER1; 
KFGListC: : iterator HELPIF = ITER1; 
KFGListC: : iterator HELPDEFRETURN = ITER1; 
KFGDefListC: : iterator DEFIT; 
AktLevel = ITERl->getLevel ( ) ; 

//cout « "bearbeitender Knoten: " « ITER1 ->getNodeNr {) « endl ; 
//finden des ersten defs oberhalb des use. 
do { 

if { HELPLOOP->getKFGNodeType ( ) == EE1 ) { 
dummyl f = 1; 
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} 

if ( (HELPDEF->getKFGNodeType ( } == ETh ) && ( HELPDEF->getLevel ( ) <= ITER1- 
>getLevel U } && (dummylf == 0) ) { 

HELPIF = HELPDEF; 

while ( (HELPDEF->getKFGNodeType( ) != IFC) t I ( HELPDEF->getLevel { ) 

HELFIF->getLevel { ) ) ) { 

HELPDEF — ; 

} 

dummy I f = 0; 

} 

if (HELPDEF->getKFGNodeType( ) == NO) { 
DEFIT « HELPDEF->Def s. begin ( i ; 

if (strcmpf DEFIT->getDef { ) , USEIT->getUse ( ) ) ==0} { 
HELPDEFRETURN = HELPDEF; 
if (HELPDEF != ITER1 ) { 
dummy = 1; 

} 

} 

} 

HELPDEF — ; 

} while ((HELPDEF != Ll.beginO) && (dummy != 1}); 

if ( (HELPDEF == Ll.begin()) && ( HELPDEF->getKFGNodeType ( ) == NO)) { 
DEFIT = HELPDEF->Def s . begin ( ) ; 

if {strcmp(DEFIT->getDef ( ) , USEIT->getUse ( ) ) =- 0) { 
HELPDEFRETURN = HELPDEF; 

} 

} 

HELPDEF = HELPDEFRETURN; 

//cout « "erster def: " « HELPDEFRETURN->getNodeNr ( ) << endl; 
//finden der Sufiersten Schleife, falls diese Oberhaupt existiert. 
if {ITERl->gei:Level ( ) >= 2 ) { 

while { (HELPIT != LI . end ( ) ) && (dummyl != 1)) { 
HELPIT++; 



Level)) { 



if ( (HELPIT->getKFGNodeType( ) == EL) && ( HELPIT->getLevel ( ) <= Akt 



} 



HELPLOOP = HELPIT; 
if (HELPIT->getLevel ( ) > 2) { 
AktLevel — ; 

J 

else { 

dummyl = 1 ; 

} 



HELPIT = HELPLOOP; 

//cout « "Ende der aufiersten Schleife: n « HELPIT->getNodeNr { ) « endl; 
//gehe zum Anfang der Sufiersten Schleife, wenn es diese gibt; 
if (HELPLOOP->getKFGNodeType { } == EL) { 

while ( (HELPIT->getKFGNcdeType{ ) !=LC) || (HELPIT->getLevel ( ) != 



HELPLOOP->getLevel ( ) ) ) 

HELPIT--; 



endl; 

liegt, und 
ob es 



0) 



//cout « "Anfang der aufieren Schleife: " « HELPIT->getNodeNr ( ) < 

//wenn der gefundene def-Koten aufierhalb der auBersten Schleife 

//sein ScopeLevel grOBer ist als das der aufiersten Schleife, suche, 

//noch einen weiteren def-Knoten weiter oben gibt. 
if (HELPDEF->getNodeNr ( ) > HELPIT->getNodeNr ( ) ) { 

if (HELPDEF->getLevel ( ) >= HELPIT->getLevel ( ) ) { 
dummy = 0; 

while ( ( HELPDEF != Ll.beginO) && (dummy != 1)) { 
HELPDEF—; 

DEFIT = HELPDEF->Def s. begin ( ) ; 

if (strcmp(DEFIT->getDef ( ) , USEIT->getUse ( ) ) = 

HELPDEFRETURN = HELPDEF; 
dummy = 1; 

) 

} 

} 

} 

//c-use innerhalb der aufiersten Schleife; 
else { 

if ( HELPDEF->get Level ( ) > ITER1 ->getLevel ( ) ) { 
dummy = 0; 

while (HELPDEF != HELFIT) { 
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HELPDEF — ; 

DEFIT = HELPDEF->De fs. begin ( ) ; 

if tstrcmpt DEFIT->getDef ( ) , USEIT->getUse ( ) ) 

HELPDEFRETURN = HELPDEF; 

} 

} 

} 

} 

} 

//c-use in keiner Schleife, aber in einer Verzweigung; 
else { 

if (HELPDEF->getLevel ( ) > ITERl->getLevel ( ) ) { 
dummy = 0; 

while I (HELPDEF != Ll.beginO) && {dummy != 1)) { 
HELPDEF — ; 

DEFIT = HELPDEF->Defs. begin ( J ; 

if (strcmp(DEFIT->getDef ( ) , USEIT->getUse ( ) ) ==0) { 
HELPDEFRETURN = HELPDEF; 
dummy = 1 ; 

} 

} 

} 

} 

} 

//c-use in keiner Schleife; 
else { 

if (HELPDEF->getLevel ( ) > ITERl->getLevel { ) ) { 
dummy = 0; 

while ((HELPDEF != Ll.beginO) && (dummy != 1)) { 
HELPDEF--; 

DEFIT = HELPDEF->Def s. begin ( ) ; 

if (strcmp ( DEFIT->getDef ( ) , USEIT->getUse ( ) } ==0) { 
HELPDEFRETURN = HELPDEF; 
dummy = 1 ; 

} 

} 

} 

} 

//cout « "UpperLimitFunktion: " « HELPDEFRETURN->getNodeNr ( ) << endl; 
return HELPDEFRETURN; 



//F9: Funktion uberprtlft, ob ein Knoten bereits im Slice vorhanden ist. Wenn 
// wird eine eins zurUckgelief ert , andernfalls eine null. 
// input: Knotennummer des gesuchten Knotens; 
// output: Integerwert 0 Oder 1; 
int SliceC: : checkForNodes ( int NodeNumber) { 
int dummy = 0; 

SliceC: : iterator SL1 = begin(); 

while ((SL1 != end ( ) ) && (dummy != 1)) { 

if ( (+SL1 ). first . getNodeNr( ) == NodeNumber) { 
dummy =1; 

} 

SL1++; 

} 

i f ( dummy == 1 ) { 
return 1; 

} 

else { 

return 0; 

} 

} 



//F10: Funktion untersucht, ob ein def in einer Schleife ist; wenn ja, wird die 
// Funktion Fl , die den p-use sucht, aufgerufen. Dort wird als erstes nach- 

// gesehen, ob der gefundene p-use bereits im Slice vorhanden ist. 

void SliceC: : def InLoop ( KFGListC & LI, KFGListC :: iterator ITER) { 
int dummyLoop = 0; 

KFGListC: : iterator HELPIT = ITER; 

while ((HELPIT != Ll.beginO) && (dummyLoop != 1)} { 
HELPIT — ; 

, uc . Tr , TrT , if ( ( (HELPIT->getKFGNodeType() == LC) | I ( HELPIT->getKFGNodeType ( ) == IFC)) 

&& (HELPIT->getLevel () == ITER->getLevel () ) ) { " 

sliceForLoops ( LI, ITER) ; 
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dummyLoop *= 1; 



//Fll: Funktion bekommt den ausgewahlten Startknoten fur den Slice Ubermmi ttelt, 
// untersucht, ob dieser Knoten in einer Schleife ist; wenn ja, wird zuerst 

// die Funktion " si iceFor Loops" aufgerufen, ansonsten, sofort " f indDef ToCUse" ' . 

void SliceC: : startBuildSlice (KFGListC & LI/*, KFGListC: : iterator OUTPUTIT*/) { 
int dummyNode = 0; 

KFGListC: : iterator STARTVARI = def ineVariableToSlice ( LI ) ; 
KFGListC: : iterator HE L POUT = STARTVARI; 
while { (HELPOUT != Ll.begin(J) && (dummyNode != 1)) { 
HELPOUT — ; 

if ( ( (HELPOUT->getKFGNodeType{ ) == LC) If ( HELPOUT->getKFGNodeType ( ) 
IFC) ) && {HELPOUT->getLevel ( J == STARTVARI ->get Level ( ) ) ) { 

si iceFor Loops (LI, STARTVARI ) ; 
dummyNode = 1; 

} 

} 

//cout « "Fll" « OUTPUTIT->getNodeNr t } « endl; 
f indDef ToCUse (LI, STARTVARI } ; 



void SliceC: : sliceAusgeben ( ) { 

ofstream Ziel ( "Slice2 . sic" } ; 

ostream_iterator<KFGListNodeC> POSIT (Ziel, "\n">; 
//ostream_iterator<KFGListNodeC> POSIT2(Ziel, "\n"); 
SliceC: : iterator SLC = begin(); 
while { SLC != end ( ) ) { 

*POSIT++ = (*SLC) . first; 

SliceC: :Nachfolger: : iterator IT = ( *SLC ). second . begin () ; 
SliceC: :Nachfolger: : iterator ITEND = ( *SLC) . second. end {) ; 
while (IT != ITEND) { 

//a = (*IT) . first; 

*POSIT++ = SLC[ (+IT) . first] . first; 
+IT++; 

} 

++SLC; 

} 



ffinclude "KFGDef.h" 
□ 

^include <iostream> 
□ 



□ 
□ 
D 
□ 



ostreams operator « { ostreami os, const KFGDef C& Node){ 

os « "DEF: " « Ncde.Def « " " « Node . ScopeLevelD; 

return os; 

} 



ffinclude "KFGLineNode . h" 
D 

#include <iostream> 

ostream& operator « { ostreamS os, const KFGLineNodeCfi Node ) { 
os « Node. Name « " " « Node . LineNumber << endl; 
return os; 

} 



//Funktion, die aus KFGTokenList einen KFG baut. 
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If include 

□ 

^include 
□ 

^include 
#include 
#include 
#include 
ffinclude 



<iostream> 

"KFGList . h n 

"KFGTokenList.h" 
"KFGUse.h" 
"KFGDef . h** 
"KFGProgList.h" 
<algorithm> 



void KFGListC: : TokenList2KFGList (KFGTokenListC & hi) { 
int. dummy; 

KFGTokenListC: : iterator TLI = LI . end ( ) ; 
KFGP_UseListC: : iterator P_USEI; 
KFGUseListC: : iterator USEI ; 
dummy = 0; 

//while (strcmp ( TLI->getName ( ) , "main" ) != 0) { 
while ( (TLI != Ll.beginO) && (dummy != 1)) { 
if (TLI->getTokenNodeType ( ) == N) { 

if ( strcmp ( TLI->getName (), "main" ) ==0) { 
dummy =1; 

} 

} 

//TLI++; 

switch (TLI->getTokenNodeType ( ) ) { 
case PL: 



{ 



>getLineNumber ( ) ) ; 
>getScopeLevel ( } ) ) ; 



TLI — ; 

KFGListNodeC hNl ( "NORMAL" , NO, TLI->getScopeLevel ( ) ,TLI- 
hNl . Defs .push_back ( KFGDef C ( TLI->getName ( ) ,TLI- 



push_f ront {hNl ) ; ' 
TLI — ; 

} 

break; 
/*case IF: 

push_front (KFGListNodeC ( "IF", IFC, TLI->getScopeLevel ( ) ) J ; 
TLI — ; 
break;*/ 
case BT: 

//push_f ront (KFGListNodeC ( "BT" , BTh, TLI->getScopeLevel ( ) ) ) ; 
TLI — ; 

//KFGPJJseListC: : iterator F__USEI; 

KFGListNodeC hNl ( "I FCOND" , IFC, TLI->getScopeLevel ( ) ,TLI- 

>getLineNumber { ) ) ; 

while (TLI->getTokenNodeType ( ) != IF) { 

KFGUseC hUsel ( TLI ->getName ( ) , TLI ->getScopeLevel ( } ) 
P_USEI = 

find (hNl . P_Uses. begin ( ) , hNl . P_Uses . end { ) ,hUsel) ; 

if (PJJSEI == hNl.P_Uses.end( ) ) { 

hNl . P_Uses.push_back ( hUsel ) ; 
Anzahl_P_Uses++; 

} 

//hNl . FJJses.push back ( KFGUseC ( TLI->getName ( ) ,TLI- 
>getScopeLevel ( ) ) ) ; ~ ' 

TLI--; 

} 

push_f ront (hNl ) ; 
Entscheidungen++ ; 

} 

break; 
case ET: 

push_f ront ( KFGListNodeC { "ENDTHEN" , ETh, TLI->getScopeLevel ( } ) } ; 

break; 
case BE: 

push_f ront ( KFGListNodeC ( "BEGINELSE" , BE1 , TLI ->get Scope Level ( ) ) ) ; 

break; 
case EE: 

push_front ( KFGListNodeC ("ENDELSE" , EE1 , TLI->getScopeLevel ( ) ) ) ; 

break; 
/*case WHILE: 

push_front (KFGListNodeC ("WHILE", LC,TLI->getScopeLevel ( ) ) ) ; 



GR 99 P 1974 



53 

TLI — ; 
break; */ 
case BW: 

//push_f ront (KFGListNodeC ( W BW" , BL, TLI->getScopeLevel ( ) ) ) ; 

{ 

TLI — ; 

//KFGP_UseListC: : iterator P_USEI; 

KFGListNodeC hNl ( "LOOPCOND" , LC, TLI->getScopeLevel { ) , TLI- 

>getLineNumber { J ) ; 

while (TLI->getTokenNodeType ( ) != WHILE) { 

KFGUseC hUsel (TLI->getName { } , TLI->getScopeLevel ( ) ) 
P_USEI = 

find (hNl . P_Uses .begin ( ) , hNl . PJJses . end ( J , hUsel ) ; 

if (P_USEI == hNl. PJJses. end ( ) ) { 

hNl . PJJses .push Jaack (hUsel ) ; 
Anzahl_P JJses++; 

} 

//hNl. PJJses. push J>ack (KFGUseC (TLI->getName ( ) , TLI- 

>getScopeLevel ( ) ) ) ; 

TLI — ; 

} 

push_f ront ( hNl ) ; 

Schlei fenentscheidungen++ ; 

} 

break; 
case EW: 

push_f ront ( KFGListNodeC ( "ENDLOOP" , EL, TLI->getScopeLevel ( ) ) ); 
TLI — ; 
break; 
case BDOW: 
{ 

TLI — ; 

KFGListNodeC hNl ( "DOWH I LE LOOPCOND" , DOWLC,TLI- 
>getScopeLevel ( ) , TLI->getLineNumber ( ) ) ; 

while (TLI->getTokenNodeType ( ) != DOWS ) { 

KFGUseC hUsel ( TLI->getName ( ) , TLI ->getScopeLevel ( ) ) ; 
PJJSEI = 

find (hNl . P_Uses .begin ( ) , hNl . P_Uses . end ( ) , hUsel } ; 

if (PJJSEI == hNl. PJJses. end ( > ) { 

hNl . PJJses . push_back ( hUsel ) ; 
Anzahl_PJJses++; 

} 

hNl . PJJses . push_back ( KFGUseC ( TLI->getName ( ) ,TLI- 

>getScopeLevel ( ) ) ) ; 

TLI--; 

} 

push_f ront (hNl ) ; 

} 

break; 
case DO: 

push_f ront (KFGListNodeC ( "DOWHILELOOP" , DOWL, TLI->getScopeLevel ( ) ) ) ; 
TLI — ; 

Schlei f enentscheidungen++; 
break; 
case EF: 



{ 



>getScopeLevel ( ) != HLevel } ) 



>getLineNumber ( } ) ; 
>getScopeLevel ( } ) ) ; 

>getScopeLevel ( ) ) ) ; 



//TLI — ; 
int HLevel; 

HLevel = TLI->getScopeLevel ( ) ; 

push_front(KFGListNodeC("ENDLOOP",EL,TLI->getScopeLevel() ) ) 
//while (TLI->getTokenNodeType ( ) != BF) { 
while ( (TLI->getTokenNodeType ( ) != BF) || (TLI- 

TLI — ; 

} 

TLI — ; 

if (TLI->getTokenNodeType ( ) == PF) 
TLI — ; 

KFGListNodeC hNl ( "NORMAL" , NO, TLI->getScopeLevel ( ) ,TLI- 
hNl . Defs.push_back ( KFGDef C ( TLI->getName ( ) f TLI- 
Anzahl Def s++; 

hNl . Uses . push_back ( KFGUseC ( TLI->getName ( ) , TLI- 

Anzahl_Uses++ ; 
push_f ront (hNl ) ; 

//while (TLI->getTokenNodeType ( ) != EF) { 
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while ( (TLI->getTokenNodeType( ) !=EF) II (TLI- 
>getScopeLevel ( ) !^ HLevel ) ) { 

TLI++; 

} 

TLI — ; 

Zaehlschleif enentscheidungen++ ; 
Schleif enentscheidungen++; 



break; 
case FOR_D: 
{ 



>getLineNumber ( ) ) ; 



TLI — ; 

KFGListNodeC hNl < "LOOPCOND" , LC, TLI->getScopeLevel ( ) , TLI- 



while (TLI->getTokenNodeType ( ) != DEF) { 

KFGUseC hUsel { TLI->getName ( i , TLI->getScopeLevel ( ) ) ; 
P_USEI = 

find ( hNl . P_Uses . begin ( ) , hNl . P_Uses . end ( ) , hUsel ) ; 

i f { P_USEI hNl . P_Uses . end ( ) ) { 

hNl . P_Uses.push_back (hUsel ) ; 
Anzahl_P_Uses++ ; 

} 

//hNl.P_Uses.push_back ( KFGUseC f TLI->getName ( ) , TLI- 



>getScopeLevel ( ) ) ) ; 



>getLineNumber ( } ) ; 
>getScopeLevel ()-!))); 



TLI — ; 

} 

push_f ront (hNl ) ; 
TLI--; 

KFGListNodeC hN2 ( "NORMAL" , NO, ( TLI->getScopeLevel ( ) -1 } , TLI- 
hN2 . Defs.push_back (KFGDefC(TLI->getName { ) , (TLI- 



>getLineNumber ( ) ) ; 

>getScopeLevel () )) ; 
>getScopeLevel ( ) ) ) ; 



Anzahl_Def s++; 
push_f ront (hN2) ; 
TLI — ; 

} 

break; 
case RET: 

//Nur eine vorlaufige Implementierung; muB noch erweitert werden 
//ftlr den Fall, dafi nach dem RETURN eine Ausgabe folgt. 
push_f ront (KFGListNodeC ("RETURN", RETURN, TLI ->getScopeLevel ( ) ) ) ; 
TLI — ; 
break; 
case NL: 

TLI — ; 

//Knoten erzeugen, der Defs und Uses enthait; 
if (TLI->getTokenNodeType ( ) N) { 

KFGListNodeC helpNodel ( "NORMAL" , NO, TLI ->getScopeLevel ( ) ,TLI- 



TLI~; 

if (TLI->getTokenNodeType ( ) =- NL) { 
TLI++; 

helpNodel . Def s . push_back ( KFGDef C (TLI->getName ( ) , TLI- 
Anzahl_Def s + +; 

helpNodel .Uses .push_back ( KFGUseC ( TLI->getName ( ) ,TLI- 

Anzahl_Uses++; 
TLI — ; 

) 

else { 

TLI++; 

while (TLI->getTokenNodeType ( ) != DEF) { 
KFGUseC hUsel ( TLI->getName ( ) , TLI- 

>getScopeLevel ( ) ) ; 

USEI = 

find(helpNodel.Uses.begin( ), helpNodel . Uses . end ( ) , hUsel ) ; 

if (USEI == helpNodel .Uses .end () ) { 

helpNodel . Uses . push_back (hUsel ) ; 
Anzahl Uses++; 

} 

^ , t mT ^ //helpNodel .Uses. push back (KFGUseC (TLI- 

>getName ( ) , TLI->getScopeLevel ( ) ) ) ; 

TLI — ; 

} 

TLI — ; 
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helpNodel . Def s . push_back ( KFGDef C (TLI->getName ( ) ,TLI- 

>getScopeLevel ( ) ) J ; 

TLI — ; 

Anzahl_De f s++ ; 

if (TLI->getTokenNodeType ( ) — N) { 
helpNodel . Def s . pop_f ront ( ) ; 

Anzahl_Defs — ; //in 

diesem Fall handelt es sich um ein Array und 

//daher muB der letzte Knoten wieder geloscht werden. 

TLI++; 

//DafQr mufi der gelOschte Knoten in die Use-Liste eingetragen werden. 

KFGUseC hUse2 (TLI->getName ( ) , TLI- 

>getScopeLevel ( ) ) ; 

USEI = 

find (helpNodel .Uses .begin ( ) , helpNodel . Uses . end ( ) , hUse2 ) ; 

if (USEI == helpNodel .Uses. end (} ) { 

helpNodel . Uses , push_back (hUse2 ) ; 
Anzahl Uses++; 



>getName ( ) , TLI->getScopeLevel ( ) ) ) ; 
>getName ( ) , TLI->getScopeLevel ( ) ) ) ; 



TLI — ; 

helpNodel . Def s .push_back (KFGDef C (TLI- 

helpNodel . Uses .push_back (KFGUseC (TLI - 

Anzahl_Def s++; 
Anzahl_Uses++; 
TLI — ; 



>getLineNumber ( ) ) ; 
>getScopeLevel ( ) ) ) ; 



>getLineNumber ( ) ) ; 
>getScopeLevel ( ) ) ) ; 
>getScopeLevel ( } ) ) ; 



>getLineNumber ( ) ) ; 
>getScopeLevel ( ) ) ) ; 



} 

push_f ront (helpNodel ) ; 

} 

//Knoten erzeugen, der nur Defs enthSlt; 
else if (TLI->getTokenNodeType ( ) == DEF) { 
TLI — ; 

KFGListNodeC helpNodel ( "NORMAL" , NO, TLI ->getScopeLevel ( ) , TLI- 

helpNodel . Defs . push_back ( KFGDef C (TLI->getName ( ) , TLI- 

push_f ront (helpNodel } ; 
Anzahl_Def s++; 
TLI — ; 

} 

else if (TLI->getTokenNodeType ( ) == PF) { 
TLI--; 

KFGListNodeC hNl ( "NORMAL" , NO, TLI->getScopeLevel ( ) ,TLI- 

hNl . Defs . push_back ( KFGDef C ( TLI->getName ( ) ,TLI- 

hNl . Uses . push_back ( KFGUseC ( TLI->getName ( ) ,TLI- 

push_f ront (hNl ) ; 

Anzahl_Defs++; 

Anzahl_Uses++; 

} 

//Knoten erzeugen, der Output-Variablen enthSlt; 
else { 

TLI — ; 

KFGListNodeC helpNodel ( "OUTPUT" , OF, TLI->getScopeLevel ( ) , TLI- 

helpNodel .Uses. push_back ( KFGUseC ( TLI- >get Name ( ) ,TLI- 

push_f ront (helpNodel ) ; 
Anzahl_Uses++ ; 
TLI — ; 



Anweisungen++; 
break; 



default : 

TLI- 



} 

KnotenNummern ( ) ; 

KFGListC: : iterator KFG = begin () ; 
Knotenldentif izierer (KFG) ; 
addLinelnToList ( ) ; 

Anzahl_Deklarationen = zaehleDekla rationen ( LI ) , 
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void KFGListC: : KnotenNummern ( ) { 
int KnotenNr - 1; 

KFGListC: : iterator KFG1 = begin () ; 
while (KFG1 != end ( ) ) { 

if { (KFGl->getKFGNodeType ( ) == EL) II (KFGl->getKFGNodeType { ) == ETh) || 
(KFGl->getKFGNodeType( ) == BE1 ) If (KFGl->getKFGNodeType { ) == EE1 ) ) { 
KFG1++; 



} 

else 



KFG1 ->set KFG KnotenNummer (KnotenNr ) ; 

KnotenNr++; 

KFG1++; 



void KFGListC: : Knotenldenti f izierer (KFGListC: : iterator KFG) { 
int LOOPLevel = 0; 
int THENLevel = 0; 
int ELSELevel = 0; 
KFGListC: : iterator KFG1 = KFG; 
KFGListC: : iterator LOOPIT = KFG; 
KFGListC: : iterator IFIT = KFG; 
KFGListC: : iterator ELSEIT = KFG; 
while (KFG1 != end ( ) ) { 

switch {KFGl->getKFGNodeType( ) ) { 

case LC: 

{ 

LOOPLevel = KFG1 ->getLevel ( ) ; 
KFG1++; 

LOOPIT = KFG1; 

while ( (KFGl->getKFGNodeType( ) !=EL) || (KFGl->qetLevel ( ) 

LOOPLevel ) ) { 

KFGl->setKnotenIdent (LOOP) ; 
KFG1++; 



Knotenldenti f izierer ( LOOPIT ) , 



break; 
case IFC: 



!= THENLevel ) ) { 



THENLevel = KFGl->getLevel ( ) ; 
KFG1++; 
IFIT = KFG1; 

while { (KFGl->getKFGNodeType ( ) ! = ETh } || ( KFG1 ->getLevel ( ) 

KFGl->setKnotenIdent (THEN) ; 
KFG1++; 

} 

Knotenldenti f i zierer ( I FIT ) ; 

} 

break; 
case BE1 : 
{ 

ELSELevel = KFGl->getLevel ( ) ; 
KFG1++; 

ELSEIT = KFG1; 

while ( ( KFGl->getKFGNodeType ( ) !=EE1) || { KFGl->get Level ( ) 
= ELSELevel ) ) { -aw 

KFGl->setKnotenIdent (ELSE) ; 
KFG1++; 

) 

Knotenldenti f izierer (ELSEIT) ; 

} 

break; 
default : 

//cout « "Autsch" « endl; 
KFG1++; 

} 

//KFG1++; 



GR 99 P 1974 



57 

void KFGListC : : addLinelnToList ( J { 
int zahl; 
char line [256] ; 
KFGProgListC LP; 

ifstream datei ( "CodeLine . dat w ) ; 
if (idatei) { 

cout « "ERROR: Cannot open file • CodeLine -dat * . n « endl; 

} 

else { 

while ( Idatei .eof( > ) { 

datei.getlinel line, 255,'\nM; 
for (int i=0; Kstrlen ( line ) ; i++) { 
if (line[i] == • " M { 
linefi] = • \ ■ • ; 

} 

if (linefi) == MM { 
line[i) = MM 

} 

} 

zahl = atoi(line); 

KFGLineNodeC hknoten (line, zahl ) ; 

LP.push_back (hknoten) ; 

//cout « line « " " << zahl « endl; 

} 

} 

addLineToKFG ( LP ) ; 

} 



void KFGListC: : addLineToKFG (KFGProgListC & LP) { 
int dummy = 0; 
char help[256) ; 

KFGListC: : iterator KFG1 = end ( ) ; 
KFGProgListC: : iterator PROG1 - LP.endt); 
/ /KFG1 — ; 

while (KFG1 !=begin(}) { 
KFG1 — ; 

if { { KFGl->getKFGNodeType { ) == EL) I I ( KFGl->getKFGNodeType ( ) == ETh) 
(KFGl->getKFGNodeType( i == BE1 ) I | ( KFG1 ->getKFGNodeType ( ) == EE1 ) ) { 
KFG1 — ; 

} 

while ((PROG1 != LF. begin (}) && (dummy != 1)) { 

if (KFGl->getLineNr ( ) -= PROGl->getLineNumber ( ) ) { 
strcpy (help, PROGl->getName ( ) ) ; 
KFGl->setCodeLine (help) ; 
PROG1 — ; 
dummy = 1 ; 



else { 

} 



PROG1 — ; 



} 

PR0G1 = LP -end ( ) ; 
dummy - 0; 



int KFGListC: : zaehleDeklarationen (KFGTokenLi^tC & TL) { 
int zaehler = 0; 

KFGTokenListC: : iterator TListI = TL.endt); 
while (strcmp ( TListI->getName ( ) , "main" ) != 0) { 
if (TListI->getTokenNodeType ( ) == TD) { 
zaehler++; 

} 

TListI — ; 

} 

return zaehler; 

} 



//Funktion zur Ausgabe der KFGList auf den Bildschirm und in eine Datei "CFGList-" 
void KFGListC: : ListeAusgeben ( ) { 

ofstream Ziell ("CFGList . cf g" ) ; 

ostream_iterator<KFGListNodeC> Pos (Ziell, "\n" ); 
ostream_iterator<KFGDefC> PosD( Ziell, "\n"); 
ostream_iterator<KFGUseC> PosU (Ziell, "\n"); 
ostream_iterator<KFGUseC> PosP (Ziell, "\n"); 
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KFGListC: : iterator KLI = begint); 
KFGDef ListC: : iterator DEF; 
KFGUseListC: : iterator USE; 
KFGP_UseListC: : iterator P_USE; 
Ziell « "START" « endl « endl; 
while (KLI !- end ( } ) { 

Ziell « "Line " « KLI->getLineNr ( J « endl; 

Ziell « "Zeile " « KLI->getCodeLine ( ) << endl; 

Ziell « "Knoten " « KLI->getKnotenNummer ( ) « endl; 

Ziell « "KnotenTyp " « KLI->getKnotenIdent { ) « endl; 

Ziell « KLI->getStatement { } « " " « KLI->getLevel [ ) « endl; 

//*Pos++ = *KLI; 

DEF = KLI ->Defs. begin { ) ; 

USE - KLI->Uses.begin{ ) ; 

F_USE = KLI->P_Uses. begin ( ) ; 

while (DEF != KLI ->De f s . end ( ) ) { 
//*PosD++ = *DEF; 

Ziell « "DEF: " « DEF->getDef ( ) « " " « DEF- 

>getScopeLevelD( ) « endl; 

DEF++; 

} 

while (USE != KLI->Uses . end ( i ) { 
//*PosU++ = *USE; 

Ziell « "USE: " « USE->getUse ( ) « " " « USE- 

>getScopeLevelU ( ) « endl; 

USE++; 

} 

while (PJJSE != KLI->P_Uses - end ( ) ) { 
//*PosP++ = +F_USE; 

Ziell « "FJJSE: " « P_USE->getUse ( } « " " « 

P_USE->getScopeLevelU ( ) « endl; 

F_USE+-r; 

} 

Ziell « endl; 
KLI++; 

} 

Ziell « "STOP" « endl « endl; 
Ziell « "BASISGROESSEN: " « endl; 

Ziell « "Anzahl leerer Zweige: " « "0" « endl; 

Ziell « "Anzahl Entscheidungen: " « Entscheidungen « endl; 

Ziell « "Anzahl Anweisungen: " « Anweisungen << endl; 

Ziell « "Anzahl atomarer PrSdikate: " « Entscheidungen « endl; 

Ziell « "Anzahl Pradikate: " « Entscheidungen « endl; 

Ziell « "Anzahl atomarer PrSdikate, die arithm. Relationen sind: " « "0" « endl; 
Ziell « "Anzahl Schlei f enentscheidungen : " << Schlei f enentscheidungen « endl; 
Ziell « "Anzahl nicht eingeschachtelter Schleif enentscheidungen : " « "0" « endl; 
Ziell « "Anzahl ZShlschlei f enentscheidungen : " « Zaehlschlei f enentscheidungen «' 



endl ; 



Ziell « "Anzahl Dekla rationen von st rukturierten Datentypen: " « "0" « endl; 

Ziell « "Anzahl Deklarationen : " « Anzahl_Dekl a rat ionen << endl; 

Ziell « "Anzahl Realelement-Deklarationen: " « "0" « endl; 

Ziell « "Anzahl Basistyp-Dekl arationen : " « Anzahl_Deklara tionen « endl; 

Ziell « "Anzahl Defs: " « Anzahl_Defs « endl; 

Ziell « "Anzahl Uses: " « Anzahl_Uses « endl; 

Ziell « "Anzahl P-Uses: " « Anzahl_P_Uses « endl « endl; 

basisgroessenlnDatei { ) ; 



void KFGListC: : basisgroessenlnDatei ( ) { 

ofstream datei ( "Basisgroessen . bgd" , ios::out}; 

datei « "0" « endl; 

datei « Entscheidungen « endl; 

datei « Anweisungen « endl; 

datei « Entscheidungen << endl; 

datei « Entscheidungen « endl; 

datei « "0" « endl; 

datei « Schlei f enentscheidungen << endl; 
datei « "0" « endl; 

datei « Zaehlschlei f enentscheidungen « endl; 
datei « "0" << endl; 

datei « Anzahl_Deklarationen « endl; 
datei « "0" « endl; 

datei « Anzahl_Deklarationen << endl; 

datei « "0" « endl; 

datei « Anzahl_Defs << endl; 

datei « Anzahl_Uses << endl; 

datei « Anzahl_P_Uses « endl; 
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datei 


« 


« 0 ti 


<< 


endl; 


datei 


« 


ttQft 


« 


endl ; 


datei 


« 


"0" 


« 


endl; 


datei 


« 


"0" 


« 


endl ; 


datei 


« 


"0" 


« 


endl ; 


datei 


« 


"0" 


« 


endl ; 


datei 


« 


"0" 


« 


endl; 


datei 


« 


"0" 


« 


endl; 



^include "KFGListe.h" 
O 

□ 

KFGListeT KFGListe; 
□ 

□ 

void KFGListeAusgeben ( KFGListeT & L) { 
□ 

KFGListeT: : iterator I = L.begin(); 

□ 

while (I != L. end { ) ) 

COUt « « 1 • ; 

cout « " sized = M << L.size() « endl; 

} 



ff include "KFGListNode . h" 
D 

^include <iostream> 
□ 

□ 

ostream& operator « ( ostreami os, const KFGListNodeC* Node) { 

□ 

os « endl « M KnotenNr: M « Node. KnotenNr << " Typ:" « Node . Knotenldent 
endl « Node . Statement << M Level:" << Node. Level; 
return os; 

} 

int KFGListNodeC: : DummyNodeNr=l; 



□ 

# include "KFGNode.h" 
□ 

^include <iostream> 
□ 

Q 

^ ostream& operator « { ostream& os, const KFGNodeCfi Node){ 

os « Node. Name << " " << Node . ScopeLevel ; 
return os; 

} 



# include "KFGTokenList . h" 
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void KFGTokenListC: : KFGListeAusgeben { ) { 
□ 

ofstream Ziel ( "CFGTokenList" ) ; 

□ 

ostream_iterator<KFGTokenNodeC> oPos{Ziel, "\n*M; 

□ 

KFGTokenListC: : iterator I = begin () ; 

□ 

while (I != end{ ) ) { 

//*oPos++ = I->getName { ) ; 
*oPos++ = *I; 

//cout « I->getName() « " ** « I->getScopeLevel ( ) << " " << I- 
>getTokenNodeType { ) « endl; 

I++; 

} 

cout « " sized = " « size() « endl; 



#include "KFGTokenNode . h M 
ffinclude <iostream> 



ostreams operator « ( ostream& os, const KFGTokenNodeCfi Node ) { 

os « Node. Name « " M « Node . ScopeLevel « " " « Node . TokenNodeType « 
" << Node.LineNumber « endl; 

return os; 

} 

#include "KFGUse.h" 
□ 

#include <iostream> 

ostreams operator « ( ostreams os, const KFGUseC& Node) { 

os « "USE : » « Node. Use « » " « Node . ScopeLevelU; 

return os; 



/* 
□ 

* Main program to test C++ grammar and preprocessor 

□ 
□ 
□ 

#include "JLStr.h" 
□ 

#include "tokens. h" 
□ 

ffinclude " DLGLexe r . h M 
^include "Buf f eredCPreParser . h" 
*f include "CPreToCPPBuf f er . h" 
^include " JLTokenBuf f er . h" 
ffinclude "CPPParserSym. h" 
ffinclude "KFGTokenList . h" 
ffinclude "KFGList . h" 
#include "graph. h" 
# include "AS_Slice.h" 
# include "uwggraph . h" 
ffinclude "KFGProgList . h" 
ffinclude <iostream> 



static void usagefchar* progname); 

int mainfint argc, char *argv[] ) 
{ 

// For reporting memory usage 
char *p = new char [ 100000 ] ; 
long heapl = ( long }( void* ) p; 
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delete [] p; 

// Parse command-line options 
JLStr includePath; 
5 JLStr definitions; 

FILE * input File = stdin; 
bcol doTraceParse = false; 
bool doTracelnclude = false; 
bool doDump = false; 
10 char *progname = *argv; 

argc — ; 
argv++; 

15 ofstream datei ( "CodeLine . dat " , ios::trunc); 

while (argc > 0) 

{ 

if (argv[0] [0] == ) 

20 { 

switch (argv[0][l)) 

{ 

case 1 1 * : 

if (argvlO] [2] != 0) 
25 { 

// argument is part of "-I" 
includePath += ';'; 
includePath += &argv[0][2]; 
} else if (argc > 1) 

30 { 

argc — ; 
argv++; 

includePath += ' ; ' ; 
includePath = *argv; 
35 } else { 

usage ( progname ) ; 



40 



45 



50 



55 



65 



70 



75 



break; 
case 'd ' : 

if (strcmp (argv [ 0] , "-dump") == 0) 

{ 

do Dump = true; 

} 

break; 
case 1 D ' : 

if (argv[0J (2) != 0) 



// argument is part of "-D" 
definitions += ';•; 
definitions += &argv[0]{2]; 
} else if (argc > 1) 
{ 

// argument follows "-D" 
argc — ; 
argv++ ; 
definitions += *;•; 
definitions = *argv; 
} else { 

usage (progname ) ; 

60 j 

break; 
case ' t 1 : 

if (strcmp ( +argv P "-traceParse" ) == 0) 
{ 

doTraceParse = true; 
} else if (strcmp(*argv, "-tracelnclude" ) 0) 

{ 

doTracelnclude = true; 
} else { 

usage (progname ) ; 

} 

break; 
default: 

usage ( progname ) ; 
break; 

} 

} else { 

// must be the input filename 
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if (inputFile != stdin) 

{ 

// already have one 
usage (progname ) ; 

FILE *fp = fopen(*argv, "r"); 
if { f p == NULL) 

\ 

fprintf (stderr , "%s: cannot open %s for input\n", progname, *argv); 
10 exit(O); 

J 

inputFile = fp; 



15 



25 



30 
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argc — ; 
argv++; 



//printf ("%s\n%s\n%s\n M , includePath, definitions, inputFile) ; 



20 // Create input stream, lexer 

DLGFilelnput input ( inputFile ) ; 
DLGLexer scanner ( fiinput ) ; 
FastToken tok; 
scanner . setToken ( &tok) ; 



// Create preprocessor parser. Note that the preprocessor parser has 
// a built-in token buffer in the form of an input stack. 

Buf f eredCPreParser preprocessor ( ^scanner) ; 

preprocessor. init ( ) ; 

// set include path and defines directly for debugging 
if ( includePath. length ( ) == 0) 

/ 

includePath - "c : \\devstudio\ \vc\ \ include; \\msdev\ \devstudio\\ vc\\mf c\\ include" 
if (definitions . length ( ) == 0) 



definitions = 

n cplusplus; " 

4 0 " DATE =\"date\";" 

" FILE =\"filename\"; " 

" LINE =1; n 

" T IME = \ " t i me \ " ; " 

" TIME STAMP =\ w timestamp\ f 

4 5 H _M_IX86=400; " 

"_MSC_VER=1100; " 

"_WIN32; " 

" INTEGRAL MAX BITS=64"; 



// Set preprocessor options 

preprocessor . SetlncludePath { includePath ) ; 

preprocessor . Set Definitions (definitions ) ; 



55 // Set options in parser to make it act standard with MS Extensions 

preprocessor . SetOption { CPrePa rserlmp : : OptMSExtensions , true) ; 
preprocessor . SetOpt ion (CPre Parser Imp: :OptBool, true) ; 
preprocessor .SetOption (CPreParserlmp: :OptWCharT, true); 
preprocessor .SetOption (CPreParserlmp: :OptPragmas, true); 
preprocessor . SetOption (CPreParserlmp: : OptExpandPragmas, true) ; 
preprocessor . SetOption { CPreParserlmp : : OptTracklnclude, doTracelnclude ) ; 



// Buffer to store tokens output by preprocessor 
CPreToCPPBuf f er pipe2 { ipreprocessor ) ; 

// Connect preprocessor to second token buffer so that the 

// preprocessor can unilaterally squirt new tokens into the buffer 

preprocessor . SetBuf f er ( &pipe2 ) ; 



7 0 // Token buffer for the usual backtracking, etc. 

JLTokenBuf fer pipe3 ( &pipe2, CPPParserSym: : ConstLLK) ; 



// Create the C++ parser 
CPPParserSym parser ( &pipe3 ) ; 

// Set parser options to look like MSVC++ 

parser. SetOption (CPPParserSym: : OptPragmaMSPacking, true) 
parser .SetOption (CPPParserSym: : OptMSTypedef Hack, true); 
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10 



15 



40 



45 



50 



55 



//preprocessor .doTrace ( doTrace Parse ) ; 
parser .doTrace (doTraceParse ) ; 

// Process top-level rule 
parser. init t ) ; 

KFGTokenListC LI; 

parser. translation_unit { LI J ; 

// Close the input file stream 
if (inputFile != stdin) 

f close { inputFile ) ; 



// For reporting memory usage 
// For reporting memory usage 
p = new char [ 100000] ; 
20 long heap2 = { long )( void* ) p; 

delete { ] p; 

cout « "Approx heap usage before dump: " « (heap2 - heapl) « endl; 
if {do Dump) 

25 { 

// Dump the scope hierarchy 

cout « "Dump of scope hierarchy" « endl; 
parser . DumpScopes ( ) ; 
cout « endl; 

30 } 

// For reporting memory usage 
// For reporting memory usage 
p = new char [ 100000] ; 
35 long heap3 = f long J { void* ) p; 

delete [ ) p; 

cout « "Approx heap usage after dump: " « (heap3 - heapl) « endl; 
LI'- KFGListeAusgeben ( ) ; 
/ / LI . KFGTokenListToKFGList ( ) ; 



KFGListC L2; 

//KFGListC: : iterator Iter; 
L2 . TokenList2KFGList ( LI ) ; 
L2 - ListeAusgeben ( ) ; 

SliceC Slice; 

Slice . startBuildSlice ( L2 ) ; 
//Slice. buildTestGraph (L2) ; 
//cout « Slice; 

uwggraphC uwggraph; 
//uwggraph.buildlfTree (Slice) ; 
uwggraph. startBuildFT (Slice ) ; 
cout << uwggraph; 

return 0; 



60 



65 



70 



75 



static void usagefchar* progname) 

{ 

fprintf { 
stder r , 

"usage: %s [-1 directories] [-D definitions] [ -t raceParse ] [ -t racelnclude 1 [ -o 
ofile] [ifile]W 

-I directories: semicolon-separated list of include di rectori es\n M 
-D definitions: semicolon-separated list of definitions, like:\n" 

symboll ; symbol2=value2\n" 
-traceParse: output debugging inf ormation\n" 
" -tracelnclude : output trace of include stack\n" 
-dump: dump type and scope hierarchy\n" 

ifile: name of input file (otherwise it uses stdin) \n", 
progname 

) ; 

exit(l); 



#include <iostream> 
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#include <iterator> 
#include <algorithm> 
^include <fstream> 
^include "uwggraph . h n 

using namespace std; 

SliceC: : iterator uwggraphC : : f indOutputNode ( SliceC & SI ) { 
int dummy = 0; 
10 SliceC: :iterator SL1 = Sl.begint); 

SliceC: : iterator HELP = Sl.begint); 

while ((SL1 != Sl.end(J) && (dummy != 1)) f 

if ( (*SL1 ). first. getKFGNodeType { ) « OP ) { 
HELP = SL1; 
1 5 dummy = 1 ; 

} 

SL1 ++; 

} 

return HELP; 

20 i 



void uwggraphC: : startBuildFT {SliceC & SI) { 
25 int posl - 0; 

int Posil = 0; 

int SliceNr = 0; 

int LineNr = 0; 

int inLoop = 0; 
30 SliceAusgeben (SI ) ; 

char NodeText ( 128] ; 

char Bemerkung [ 1000 ] ; 

SliceC: : iterator SL1 = f indOutputNode ( SI ) ; 
SliceNr = ( *SL1 ). first . getKnotenNummer () ; 
35 LineNr = { *SL1 ) . f i rst . getLineNr ( ) ; 

sprintf (NodeText, "Op%d" , SliceNr ) ; 
strcpy(Bemerkung,SLl->first.getCodeLine( ) ) ; 
//sprintf (Bemerkung, "Line %d", LineNr ) ; 
An SliceC: :Nachfolger: : iterator BEGIN = ( *SL1 ). second . begin {) ; 

SliceC: :Nachfolger: : iterator END — { *SL1 ). second . end () ; 
while (BEGIN != END) { 

if ( BEGIN ->second =- KFK) { 

uwgknotenC hknotenl (EFFECT, SliceNr, NodeText, Bemerkung) 
Posil = insert (hknotenl ) ; 

SliceC: :iterator SLPUSE = find Last PUsetSl, SliceNr); 
checkLoopOrCond ( SI, SLPUSE, SL1, Posil); 
inLoop = 1; 
BEGIN++; 



45 



50 else { 

BEGIN++; 

} 

} 

if (inLoop ==0) { 

" uwgknotenC hknotenl (EFFECT, SliceNr, NodeText, Bemerkung ) ; 

uwgknotenC hknoten2 (OR, "OR" ) ; 
insert (hknotenl, hknoten2, 0) ; 
posl = size ( ) -1; 

uwgknotenC hknoten3 (CAUSE, SliceNr, NodeText, Bemerkung) ; 
insert ( hknoten2, hknoten3, 0) ; 
^ addFirstNodesToFT ( SI, SliceNr, posl); 

check ( ) ; 



60 



65 



void uwggraphC: : CheckLoopOrCond ( SI iceC & SI, SI iceC: : iterator SLPUSE, SliceC: • iterator 
SLORIG, int Posl) { " 
'0 int PosRet = 0; 

switch (SLPUSE->f i rst . getKFGNodeType () ) { 

case IFC: 

PosRet = build I nl f Tree ( SI , SLPUSE, SLORIG, Posl); 
7 c //cout « "Testla: " « SLHELP->fi rst . getKnotenNummer ( ) « endl; 

' ^ break; 

case LC: 

buildlnLoopTree (SI, Posl, SLPUSE, SLORIG); 

//cout « "Testlb: " « SLHELP->fi rst . getKnotenNummer ( ) « endl; 
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break; 
default: 

cout « "Ups" « endl; 

1 



void uwggraphC: : addFi rstNodesToFT (SliceC & SI, int KnotenNr, int Posl) { 
int helpNr = 0; 
10 int ret = 0; 

int pos = 0; 
int KnotenNrl = 0; 
int LineNrl = 0; 
char NodeText [128] ; 
15 char Bemerkung [1000) ; 

SliceC: : iterator NODE « define Iter a tor { SI , KnotenNr); 
SliceC: :Nachfolger: : iterator BEGIN = NODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END = NOD£->second . end { ) ; 
while (BEGIN != END) { 
2 0 helpNr = BEGIN-> first; 

KnotenNrl ~ SI [helpNr ]. first . getKnotenNummer () ; 
SliceC: : iterator NODE1 = def inelterator ( SI , KnotenNrl ) ; 
if (NODEl->first.getLevel ( ) > 1) { 

SliceC: : iterator PUSE = f indLastPUse ( SI , KnotenNrl); 
25 switch (PUSE->first.getKFGNodeType( ) ) { 

case IFC: 

ret - buildlnl f Tree ( SI , PUSE, NODE1 , Posl ) ; 
break; 
case LC: 

30 buildlnLoopTree (SI, Posl, PUSE,NODEl J ; 

break; 
default: 

cout « "Something is wrong!" « endl; 



35 j 

else 



40 



45 } 

BEGIN++ 



LineNrl = SI [helpNr ]. first - getLineNr () ; 

sprintf (NodeText, "Op%d" , KnotenNrl ) ; 

/ /spr int f (Bemerkung, "Line %d" , LineNrl ) ; 

strcpy { Bemerkung, SI [helpNr] . f i rst . getCodeLine ( ) > ; 

uwgknotenC hknotenl ( CAUSE, KnotenNrl , NodeText , Bemerkung ) ; 

pos = insert (hknotenl ) ; 

verbindeEcken { Posl , pos, 0 ) ; 

addFi rstNodesToFT (SI, KnotenNrl, Posl); 



50 

SliceC: : iterator uwggraphC: : f indLastPUse ( Sli ceC & SI, int SliceNr) { 
int helpNrl = 0; 
int SliceNrl = 0; 
55 SliceC: : iterator SLI = def inelterator ( SI , SliceNr); 

SliceC: : iterator SLHELF = SLI; 

SliceC: :Nachfolger: : iterator BEGIN = { *SL1 ). second . begin () ; 
SliceC: :Nachfolger: : iterator END = ( +SL1 ). second . end () ; 
while (BEGIN != END) { 
60 if {BEGIN->second == KFK) { 

helpNrl = BEGIN->first; 

SliceNrl = SI [ helpNrl ] . f i rst . getKnotenNummer ( ) ; 

SLHELP = def inelterator ( SI , SliceNrl); 
„ SLHELP = f indLastPUse (SI, SliceNrl); 

DO } 

BEGIN++; 

} 

return SLHELP; 

70 } 

SliceC: :iterator uwggraphC: : f indLast PUse2 ( SliceC & SI, int SliceNr, int RefNr) 
int helpNrl = 0; 
int SliceNrl = 0; 

SliceC: :iterator SLRETURN = def inelterator ( SI , SliceNr); 
SliceC: : iterator SLHELP = SLRETURN; 

SliceC: :Nachfolger: iterator BEGIN «= SLRETURN->second . begin () ; 
SliceC: :Nachfolger: : iterator END = SLRETURN->second . end ( ) ; 



GR 99 P 1974 



66 

while (BEGIN != END) { 

if (BEGIN->second == KFK) { 

helpNrl « BEGIN->f irst; 

SliceNri = SI ( helpNrl ] . first . getKnotenNununer ( ) ; 
SLHELP = definelterator (SI, SliceNri); 
SLHELP = findLastPUse2 (SI, SliceNri, RefNr); 
if (SLHELP-> first. getKnotenNununer ( ) != RefNr) { 
SLRETURN = SLHELP; 

} 

} 

BEGIN++; 

} 

return SLRETURN; 

} 



SliceC: : iterator uwggraphC: : lookForNextPUse ( SliceC & SI, SliceC: : iterator SNODE, Sli- 
ceC: : iterator SLPUSE) { 

int helpNrl = 0; 

int helpNr2 = 0; 

int helpNr3 - 0; 

int dummy = 0; 

int dummyl =0; 

int KnotenNrl = 0; 

int KnotenNr2 = 0; 

int RefNr = SLPUSE->f irst . getKnotenNununer () ; 
SliceC: : iterator HELP = SNODE; 
SliceC: : iterator RETURN = SNODE; 

SliceC: :Nachfolger: : iterator BEGIN1 = SNODE->second . begin (} ; 
SliceC: :Nachfolger: : iterator END1 = SNODE->second . end ( ) ; 
while ( (BEGIN1 != END1 ) && (dummy != !)){ 
helpNrl = BEGINl->f i rst ; 

SliceC: :Nachfolger: : iterator BEGIN2 - SI [ helpNrl ) . second - begin ( ) ; 
SliceC: :Nachfolger: : iterator END2 = SI [helpNrl J . second . end () ; 
while ({BEGIN2 != END2 ) && (dummyl != 1)) { 
if (BEGIN2->second == KFK) { 

helpNr2 = BEGIN2->f irst ; 

if (SI [helpNr2] . first .getKnotenNununer ( ) != RefNr) { 

KnotenNrl = SI [ helpNr2 ). first . getKnotenNununer () ; 
RETURN = definelterator (SI, KnotenNrl); 
SliceC: :Nachfolger: : iterator BEGIN3 = RETURN- 



>second . begin ( ) ; 
>second . end ( ) ; 

!= RefNr) { 

SI (helpNr3] . fi rst . getKnotenNununer ( ) ; 
tenNr2, RefNr); 



SliceC: : Nachfolger :: iterator END3 = RETURN- 

while (BEGIN3 != END3 ) { 

if (BEGIN3->second == KFK) { 

helpNr3 « BEGIN 3->fi rst; 

if (SI [helpNr3] . first . getKnotenNununer ( ) 
KnotenNr2 = 

RETURN = f indLast PUse2 (SI, Kno- 



} 

else { 



BEGIN3++; 



dummyl = 1 ; 
dummy = 1 ; 



KnotenNrl = SI [ helpNrl ] . f i rst . getKnotenNununer ( ) ; 
HELP = definelterator (SI, KnotenNrl); 

RETURN = lookForNextPUse (SI, HELP, SLPUSE); 



} 

BEGIN1++; 

} 

return RETURN; 



BEGIN2++; 



SliceC: : iterator uwggraphC :: retu rnCondNode ( Sli ceC & SI, inf SliceNr) ' 
int helpNr = 0; 
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int dummy = 0; 
int dummy 2 = 0; 
int SliceNr2 = 0; 

SliceC: : iterator SL1 = def inelterator ( SI , SliceNr); 
5 SliceC: : iterator HELP = SL1; 

SliceC: :Nachfolger: : iterator BEGIN - ( *SL1 ). second . begin () ; 
SliceC: :Nachfolger: : iterator END - { *SL1 ). second- end () ; 
while ( (BEGIN != END) && (dummy != 1)) { 
helpNr - BEGIN->f irst; 
10 SliceNr = SI [helpNr ]. first . getKnotenNummer () ; 

HELP = def inelterator (SI, SliceNr) ; 

SliceC: :Nachfolger: : iterator BEGIN2 = (*HELP) . second . begin ( ) 
SliceC: :Nachfolger: : iterator END2 = ( *HELP )- second. end () ; 
while ( (BEGIN2 != END2 ) && (dummy2 != 1)) { 
15 if ( ( *BEGIN2 ) . second == KFK) { 

helpNr = (*BEGIN) . first; 

SliceNr2 = SI [helpNr ]. fi rst . getKnotenNummer () ; 
HELP = def inelterator ( SI , SliceNr2); 
dummy2 - 1; 

2 0 dummy = 1 ; 

} 

BEGIN2++; 

} 

BEGIN++; 



25 



return HELP; 



3 0 //Funktion untersucht, ob zwei Kont rollstrukturen geschachtelt sind oder nicht. 

int uwggraphC: : checkPUsesl (SliceC & SI, SliceC: : iterator SLPUSEREF, SliceC :: iterator 
SLPUSE) { 

int helpreturn = 0; 

int KnotenNummerRef = 0; 

3 5 int helpNrl = 0; 

int KnotenNrl = 0; 

KnotenNummerRef = SLPUSE-> fi rst . getKnotenNummer () ; 

SliceC: :Nachfolger: :iterator BEGINI = SLPUSERE F->second . begin {) ; 
SliceC: tNachfolger: : iterator END1 = SLPUSEREF->second . end ( ) ; 

4 0 while (BEGINI != END1 ) { 

if (BEGINl->second KFK) { 

helpNrl = BEGINI ->fi rst ; 

KnotenNrl = SI [ helpNrl ]. first . getKnotenNummer () ; 
if (KnotenNrl == KnotenNummerRef) { 
helpreturn = 1; 



45 



50 



55 



else { 

SLPUSEREF = def inelterator [ SI , KnotenNrl ) ; 
helpreturn = checkPUsesl ( SI , SLPUSEREF, SLPUSE ) ; 



} 

BEGIN1++; 

} 

return helpreturn; 



int uwggraphC: :checkPUses2 (SliceC & SI, SliceC :: iterator SLPUSEREF, SI iceC :: iterator 
O \J SLPUSE) { 

int helpreturn = 0; 
int KnotenNummerRef = 0; 
int helpNrl = 0; 
int KnotenNrl = 0; 

KnotenNummerRef = SLPUSERE F->fi rst . getKnotenNummer ( ) ; 
SliceC: :Nachfolger: : iterator BEGINI = SLPUSE->second . begin () ; 
SliceC: :Nachfolger: :iterator END1 = SLPUSE->second . end ( > ; 
while (BEGINI != END1 ) { 
- n if (BEGINl->second == KFK) { 

'0 helpNrl = BEGINl->f irst; 

KnotenNrl = SI [ helpNrl ]. fi rst . getKnotenNummer () ; 
if (KnotenNrl == KnotenNummerRef) { 
helpreturn - 1; 

"75 else { 

SLPUSE = def inelterator (SI, KnotenNrl ) ; 
helpreturn = checkPUses2 ( SI , SLPUSEREF, SLPUSE ) ; 
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} 

BEGIN1++; 

} 

return helpreturn; 



int uwggraphC: : buildlnl f Tree ( SliceC & SI, SliceC: : iterator SLIF, SliceC: : iterator SLORIG, 

1 0 int posl ) { 

int pos2 = 0; 
int posIFOR = 0; 
int posIFDFOR = 0; 
int posIFKFOR = 0; 
15 int posIFDFORA2 = 0; 

char NodeText [128] ; 
char Berne rkung [ 1000 J ; 

int KnotenNr = SLIF->f irst - getKnotenNummer { ) ; 
int LineNr = SLI F->f i rst . getLineNr U ; 

2 0 sprintf (Bemerkung, "Verzweigung ( %d ) LineNr ) ; 

strcpy (NodeText, SLIF->f irst. getCodeLine( ) J ; 
uwgknotenC hknotenl ( OR, NodeText, Bemerkung } ; 
pos2 = insert (hknotenl ) ; 
posIFOR = size() - 1; 
25 verbindeEcken (posl, pos2,0); 

sprintf (NodeText, "Ver zweigung_KF ( %d ) ", LineNr ) ; 
uwgknotenC hknotenS ( OR, NodeText ) ; 
posIFKFOR = insert (hknotenS) ; 
verbindeEcken ( pos 2, posIFKFOR, 0 ) ; 

3 0 bui ld_IFKF_Part (SI, posIFKFOR, SLIF); 

switch (SLORIG->f irst . getKnotenldent ( ) ) { 
case THEN: 
{ 

sprintf (NodeText, "Verzweigung_DF_Alt . 1 ( %d ) ", LineNr ) ; 
uwgknotenC hknoten2 (AND, NodeText ) ; 
insert (hknotenl, hknoten2, 0) ; 
sprintf (Bemerkung, "Alt. 1 (%d) ", LineNr) ; 
sprintf (NodeText, "Alt. 1 (%d) ", LineNr) ; 
uwgknotenC hknoten3 ( CAUSE, NodeText, Bemerkung ) ; 
insert ( hknoten2, hknoten3, 0) ; 
sprintf (NodeText, "Alt. 1 (%d) ", LineNr) ; 
uwgknotenC hknoten4 (OR, NodeText ) ; 
insert ( hknoten2 , hknoten4 , 0) ; 
posIFDFOR = sized - 1 ; 

build_Al_Part (SI, posIFDFOR, SLIF, SLORIG); 
) 

break; 
case ELSE: 
{ 

^0 sprintf (NodeText, "Ver zweigung_DF_Alt . 2 ( %d )", LineNr ) ; 

uwgknotenC hknoten2 ( AND, NodeText ) ; 
insert (hknotenl , hknoten2, 0 ) ; 
sprintf (Bemerkung, "Alt .2 (%d) ", LineNr ) ; 
j- j- sprintf (NodeText, "Alt . 2 ( %d LineNr ) ; 

uwgknotenC hknoten3 { CAUSE , NodeText , Bemerkung ) ; 
insert (hknoten2 , hknoten3, 0 ) ; 
sprintf (NodeText, "Al t . 2 ( %d ) " , LineNr ) ; 
uwgknotenC hknoten4 ( OR, NodeText ) ; 
insert (hknoten2, hknoten4, 0) ; 
posIFDFORA2 = sized - 1; 

build_Al_Part (SI, posIFDFORA2, SLIF, SLORIG); 

) 

break; 
default : 

cout « "Autsch!!!" « endl; 

} 

return posIFDFOR; 
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70 



void uwggraphC: : bui ld_Al_Part (SliceC & SI, int posIFDFOR, SliceC: : iterator SLIF, Sli- 
ceC :: iterator SLNODE) { 

int posO = 0; 
75 int posl = 0; 

int ret = 0; 

int dummy = 0; 

int checkNr = 1; 
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int checkPUse = 1; 
int helpNrl ~ 0; 
int helpNr2 = 0; 
int. KnotenNrO - 0; 
int KnotenNrl = 0; 
int KnotenNr2 = 0; 
int LineNrO = 0; 
int LineNrl = 0; 
char NodeTextO [ 128 ] ; 
char BemerkungO [ 1000] ; 

KnotenNrO = SLNODE->f irst . getKnotenNuiraner ( ) ; 

LineNrO = SLNODE->f irst . getLineNr ( ) ; 

sprintf (NodeTextO, "Op%d n , KnotenNrO ) ; 

// sprint f (Berne rkungO, "Line %d n , LineNrO) ; 

strcpy (BemerkungO, SLNODE->f irst . getCodeLine ( ) ) ; 

uwgknotenC hknotenO ( CAUSE, KnotenNrO, NodeTextO, BemerkungO ) ; 

posO = insert (hknotenO } ; 

verbindeEcken (posIFDFOR, posO, 0 ) ; 

SliceC: rNachfolger: : iterator BEGINO = SLNODE->second . begin () ; 
SliceC: rNachfolger: riterator ENDO = SLNODE->second . end ( ) ; 
while (BEGINO != ENDO) { 

if (BEGINO->second == DFK) { 

helpNrl = BEGIN0->f i rst ; 

KnotenNrl = SI [ helpNrl ]. first . getKnotenNuiraner () ; 
SLNODE = define Iterator (SI, KnotenNrl ) ; 
if (KnotenNrl < KnotenNrO) { 

SliceC: :Nachfolger: riterator BEGIN1 = SLNODE->second . begin () ; 
SliceC: rNachfolger :: iterator END1 = SLNODE->second . end ( ) ; 
while (BEGIN1 != END1 ) { 

if (BEGINl->second == KFK) { 

helpNr2 = BEGINl->f i rst ; 
KnotenNr2 = 



SI [helpNr2] . f i rst . get Knot enNummer ( ) ; 
tor (Sl,KnotenNr2) ; 



SliceC: : iterator HELPPUSE = defineltera- 

checkNr - checkUWGNode ( KnotenNr2 ) ; 

if ( SLIF->f irst . getKnotenNummer ( ) > KnotenNr2) 



sesl (S1,SLIF,HELPPUSE) ; 



ses2 (SI, SLIF, HELPPUSE) ; 



checkPUse = checkPU- 



} 

else { 



checkPUse 



checkPU- 



se (SI, HELPPUSE) ; 

>f irst .getKFGNodeType ( ) ) { 

sIFDFOR, HELPPUSE, SLNODE); 
HELPPUSE, SLNODE, posIFDFOR); 



if (KnotenNr2 != SLI F->fi rst . getKnotenNummer (J ) 

if (checkPUse == 0) { 
dummy = 1; 

HELPPUSE = f indOutmostPU- 

switch (HELPPUSE- 

case LC: 

buildInLoopTree(Sl, po- 

break; 
case IFC: 

ret = buildlnl f Tree ( SI , 



break; 



default: 



Al ! 



<< endl; 



cout « " Falscher Weg in 



else 



PUse (SI, HELPPUSE) ; 

>f irst. getKFGNodeType { ) ) { 

build!nLoopTree{Sl, posIFDFOR, HELPPUSE, SLNODE); 



if (checkNr == 0) 
dummy = 1 ; 
HELPPUSE = 



f indOutmost- 
switch (HELPPUSE- 
case LC: 



break; 
case IFC: 
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ret = buildlnlf- 

TreetSl, HELPPUSE, SLNODE, posIFDFOR) ; 

breaks- 
default : 

cout « "Falscher 

Weg! " « endl; 

} 

} 

) 

} 

} 

BEGIN1++; 

} 

if (dummy ==0) { 

LineNrl = SI [ helpNrl ] . f i rst - getLineNr { ) ; 
sprintf (NodeTextO, M Op%d" , KnotenNrl ) ; 
//sprintf {BemerkungO, "Line %d M , LineNrl) ; 
strcpy (BemerkungO, SI I helpNrl J . first . getCodeLine ( ) ) ; 
uwgknotenC hkno- 
tenl (CAUSE, KnotenNrl , NodeTextO, BemerkungO ) ; 

posl = insert {hknotenl ) ; 
verbindeEcken (posIFDFOR, posl, 0) ; 
build_Al_Part (SI, posIFDFOR, SLIF, SLNODE); 



} 

} 

BEGIN0++; 
dummy - 0; 



} 



void uwggraphC: : build_IFKF_Part (SliceC & SI, int posKFOR, SliceC: : iterator SLPUSE) { 
int posl = 0; 
int ret = 0; 
int dummy = 0; 
int checkNr - 1; 
int checkPUse = 1; 
int helpNrl = 0; 
int helpNr2 = 0; 
int KnotenNrO = 0; 
int KnotenNrl = 0; 
int KnotenNr2 = 0; 
int LineNrO = 0; 
int LineNrl = 0; 
char NodeText ( 128] ; 
char Bemerkung [ 1000] ; 

KnotenNrO = SLPUSE->f i rst . getKnotenNummer ( ) ; 
LineNrO = SLPUSE->fi rst . getLineNr () ; 
sprintf (NodeText, "Op%d" , KnotenNrO } ; 
//sprintf (Bemerkung, "Line %d", LineNrO) ; 
strcpy( Bemerkung, SLPUSE->fi rst . getCodeLine ( ) ) ; 
uwgknotenC hknotenl (CAUSE, KnotenNrO, NodeText , Bemerkung ) ; 
posl = insert (hknotenl ) ; 
verbindeEcken (posKFOR, posl, 0) ; 

SliceC: :Nachfolger: : iterator BEGIN0 = SLPUSE->second . begin () ; 
SliceC: :Nachfolger :: iterator END0 = SLPUSE->second . end { ) ; 
while (BEGIN0 != END0 ) { 

if (BEGIN0->second == DFK) { 

helpNrl = BEGIN0->f i rst ; 

KnotenNrl = SI [ helpNrl ]. first . getKnotenNummer () ; 
SliceC: : iterator SLNODE = def inelterator { SI , KnotenNrl ) ; 
if (KnotenNrl < KnotenNrO) { 

SliceC: rNachfolger: : iterator BEGIN1 = SLNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END1 = SLNODE->second . end ( ) ; 
while (BEGIN1 != END1 ) ( 

if (BEGINl->second == KFK) { 

helpNr2 = BEGINl->f i rst; 
KnotenNr2 = 



SI [helpNr2] . fi rst . getKnotenNummer ( ) ; 
tor (Sl,KnotenNr2) ; 

tenNr2) { 

sesl (SI, SLPUSE, HELPPUSE) ; 



SliceC: : iterator HELPPUSE = defineltera- 

checkNr = checkUWGNode ( KnotenNr2 ) ; 

if (SLPUSE->f irst . getKnotenNummer ( ) > Kno- 

checkPUse = checkPU- 
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20 



25 



30 



35 



40 



45 



ses2 ( SI, SLPUSE, HELPPUSE ) ; 
>first.getKnotenNummer ( ) ) { 

se( SI, HELPPUSE) ; 
>first.getKFGNodeType( } ) { 



15 posKFOR, HELPPUSE, SLNODE); 



HELPPUSE, SLNODE, posKFOR); 



Al! " « endl; 



71 

else 

} 



checkPUse - checkPU- 



if (KnotenNr2 != SLPUSE- 

if (checkPUse ==0) { 
dummy = 1; 

HELPPUSE = f i nd Outmost PU- 

switch (HELPPUSE- 

case LC: 

buildlnLoopTree ( SI , 

break; 
case IFC: 

ret = buildlnl f Tree ( SI , 



break; 



default : 



else { 



PUse (SI, HELPPUSE ) ; 
>first.getKFGNodeType ( ) ) { 

buildlnLoopTree (SI, posKFOR, HELPPUSE, SLNODE); 
Tree (SI, HELPPUSE, SLNODE, posKFOR) ; 



cout « "Falscher Weg in 



if (checkNr ==0) { 
dummy — 1 ; 

HELPPUSE = findOutmost- 
switch {HELPPUSE- 
case LC: 



break; 
case IFC: 

ret - buildlnlf- 



break; 



default : 



Weg! 



« endl; 



cout << "Falscher 



50 



55 



60 



65 



BEGIN1++; 



} 



if (dummy ==0) { 

LineNrl = SI [ helpNrl ] . f i rst . getLineNr ( ) ; 
sprintf (NodeText, ,, Op%d" , KnotenNrl ) ; 
//sprintf (Bemerkung, "Line %d" , LineNrl ) ; 
strcpy (Bemerkung, SI [helpNrl ] . f i rst . getCodeLi ne ( ) ) ; 
uwgknotenC hkno- 
tenl (CAUSE, KnotenNrl, NodeText, Bemerkung) ; 

posl - insert (hknotenl ) ; 
verbindeEcken (posKFOR, posl, 0) ; 
build_IFKF_Part (SI, posKFOR, SLNODE); 



} 

} 

BEGIN0++; 
dummy = 0; 



} 



70 



75 



void uwggraphC: : bui ldlnLoopTree ( SI i ceC & SI, int Posl, SliceC: : iterator SLPUSE, Sli- 
ced : iterator SLNODE) { 

int posil = 0; 

int pos3 = 0; 

int posLOOP_KF ^ 0; 

int posOR_Dl = 0; 

int posOR_D2 = 0; 

int posAND_KF = 0; 

int SliceNr = 0; 
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int NodeNrD2 = 0; 
int KnotenNr = 0; 
int LineNr = 0; 

KnotenNr = SLPUSE->f irst . getKnotenNummer ( J ; 
5 LineNr = SLPUSE->f irst . getLineNr ( ) ; 

char NodeText [ 128 ] ; 
char Bemerkung[1000] ; 

sprintf (Bemerkung, "Schleife ( %d) ", KnotenNr ) ; 
strcpy (NodeText, SLPUSE->f irst . getCodeLine ( } ) ; 
10 uwgknotenC hknotenl (OR, NodeText, Bemerkung > ; 

posil = insert (hknotenl ) ; 
verbindeEcken ( Posl, posil, 0) ; 

sprintf {NodeText, "Schlei fe_DF_Durchl . 1 { %d ) M , LineNr } ; 
uwgknotenC hknoten2 (AND, NodeText ) ; 

1 5 sprintf ( NodeText, "Schlei f e_DF_Durchl . + { %d ) " , LineNr ) ; 

uwgknotenC hknoten3 (AND, NodeText } ; 
pos3 = insert (hknoten3 ) ; 
verbindeEcken (posil ,pos 3, 0 ) ; 

sprintf (NodeText, "Schlei fe_KF ( %d ) ", LineNr) ; 

2 0 uwgknotenC hknoten4 (OR, NodeText ) ; 

insert ( hknotenl , hknoten2, 0 ) ; 
insert { hknotenl , hknoten4 , 0) ; 
posLOOP_KF - size() - 1; 

sprintf (Bemerkung, "Durchl.l { %d )", LineNr ) ; 
25 sprintf (NodeText, "Durchl . 1 (%d) ", LineNr) ; 

uwgknotenC hknoten5 (CAUSE, NodeText, Bemerkung ) ; 
sprintf (NodeText, "Durchl . 1 (%d) M , LineNr ) ; 
uwgknotenC hknoten6 (OR, NodeText ) ; 
insert ( hknoten2 , hknoten5, 0 ) ; 
insert (hknoten2, hknoten6, 0) ; 
posOR_Dl = size() - 1; 

sprintf (Bemerkung, "Durchl .+ ( %d )", LineNr ) ; 
sprint f (NodeText , "Durchl . + ( %d ) " , LineNr } ; 
uwgknotenC hknoten7 ( CAUSE, NodeText , Bemerkung ) ; 
sprintf (NodeText, "Durchl . + ( %d ) " , LineNr ) ; 
uwgknotenC hknoten8 (OR, NodeText ) ; 
insert ( hknoten3, hknoten7 , 0) ; 
posOR_D2 = insert (hknoten8 ) ; 
verbindeEcken (pos3, posOR_D2,0); 
4 0 sprintf (NodeText, M KF ( %d ) ", LineNr ) ; 

uwgknotenC hknoten9 (AND, NodeText ) ; 
insert ( hknoten4 , hknoten9, 0) ; 
insert ( hknoten3, hknoten5, 0) ; 
posAND_KF = sized - 1; 
insert (hknoten9, hknotenS, 0) ; 

NodeNrD2 = buildIn_LoopKF_ANDPart ( SI , posAND_KF, SLPUSE); 
buildIn_LoopKF_ORPart (SI, posLOOP_KF, SLPUSE, NodeNrD2 ) ; 
//buildIn_D2_Part (SI, posOR_D2, SLPUSE, SLNODE, NodeNrD2); 
bui ldIn_Dl__Fart (SI, posOR_Dl, SLPUSE, SLNODE, NodeNrD2 ) ; 
build!n_D2_Part (SI, posOR_D2, SLPUSE, SLNODE, NodeNrD2); 



30 



35 



45 



50 



55 void uwggraphC: :buildIn_Dl_Part ( SliceC & SI, int posOR Dl , SliceC: : iterator SLPUSE, Sli- 
ceC: iterator SLNODE, int D2_RefNr) { ~ ' 

int posl = 0; 
int ret = 0; 
int KnotenNrl = 0; 
60 int LineNrl = 0; 

SliceC: iterator ITER1 = f ind_Dl_Node ( SI , SLPUSE, SLNODE) ; 
SliceC: : iterator HELP = ITER1 ; 
switch (ITERl->f irst . getKFGNodeType ( ) ) { 
case IFC: 
65 HELP 



70 



75 } 



find_Dl_Node (SI, ITER1, SLNODE); 
ret = buildlnlfTreetSl, ITER1 , HELP, posOR Dl ) ; 
break; ~ 
case LC: 

HELP = find_Dl_Node (SI, ITER1, SLNODE); 
buildlnLoopTree ( SI , posOR_Dl , ITER1 , SLNODE ) ; 
break; 
def ault : 

^ addAUDlNodes ( SI , ITER1 , posOR_Dl , D2_Ref Nr ) ; 
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Sliced : iterator uwggraphC: : f ind_Dl_Node ( SliceC & SI, SliceC :: iterator SLPUSE, Sli- 
ced : iterator SLNODE) { 

int helpNrl = 0; 

int helpNr2 = 0; 
5 int dummyl = 0; 

int dummy2 - 0; 

int KnotenNrRet « 0; 

int KnotenNrRetl = 0; 

int PUseNr = SLPUSE->fi rst . getKnotenNummer {) ; 
10 int PUseLevel = SLPUSE->f irst . getLevel ( ) ; 

SliceC: :iterator RETURNITER = SLNODE; 
KnotenNrRetl = SLNODE->f irst . getKnotenNummer {) ; 
if (KnotenNrRetl == (PUseNr + 1)) { 

RETURNITER = de finelterator ( SI , KnotenNrRetl ) ; 
15 dummyl - 1; 

dummy2 - 1 ; 

} 

SliceC: :Nachfolger: : iterator BEGIN1 = SLNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END1 = SLNODE->second . end ( ) ; 
2 0 while ( (BEGIN1 != END1 } && {dummyl !~ 1)) { 

helpNrl = BEGINl->f i rst; 

if ( (SI f helpNrl] . first . getKnotenNummer ( ) > PUseNr) && 
(SI [helpNrl] .first. getLevel ( ) >= PUseLevel)) { 

if (SI [helpNrl] . first. getLevel ( ) > PUseLevel) { 
25 KnotenNrRetl = SI [ helpNrl ]. fi rst . getKnotenNummer () ; 

if (KnotenNrRetl == (PUseNr +1}) { 

RETURNITER = def inelterator ( SI , KnotenNrRetl ) ; 
dummyl = 1 ; 
dummy 2 = 1 ; 

30 } 

SliceC: :Nachfolger: : iterator BEGIN2 = 

SI [ helpNrl ] . second .begin ( ) ; 

SliceC: :Nachfolger: : iterator END2 = SI [ helpNrl ] . second . end ( ) 
while ( (BEGIN2 != END2 ) && (dummy2 != 1)) { 
35 if (BEGIN2->seccnd == KFK) { 

helpNr2 = BEGIN2->f i rst ; 

KnotenNrRet = 

SI (helpNr2J . first . getKnotenNummer ( ) ; 

if (KnotenNrRet != PUseNr) { 

RETURNITER = defineltera- 



40 

tor (SI, KnotenNrRet ) 



dummyl = 1 ; 
dummy 2 = 1 ; 



45 , 

BEGIN2++; 



} 

else 

50 



KnotenNrRet = SI [helpNrl] .first. getKnotenNummer { ) ; 
RETURNITER = de finelterator ( SI , KnotenNrRet ) ; 
dummyl = 1 ; 



55 



60 



65 



} 

BEGIN1++; 

} 

if ( ( RETURNITER == SLNODE) && (dummyl ==0)) { 
BEGIN1 = SLNODE->second. begin () ; 
while (BEGIN1 != END1 ) { 

helpNrl = BEGINl->f irst; 

KnotenNrRet = SI [ helpNrl ]. fi rst . getKnotenNummer (} ; 
SliceC: : iterator SLNODE = define Iterator (SI, KnotenNrRet ) , 
RETURNITER = f ind_Dl_Node { SI , SLPUSE, SLNODE ) ; 
BEGIN1++; 

) 

\ 

return RETURNITER; 
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void uwggraphC: :buildIn_D2_Part (SliceC & SI, int posOR_D2, SliceC :: iterator SLPUSE, Sli- 
ceC :: iterator SLNODE, int KnotenNrD2) { 

int posl = 0; 
' O int pos2 = 0; 

int ret = 0; 

int helpNrl = 0; 

int helpNr2 - 0; 
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int KnotenNrl = 0; 

int. LineNrl = 0; 

int KnotenNrD2Ret = 0; 

int USEinD2KnotenNr = 0; 

char Bemerkungl [ 1000] ; 

char NodeTextl [ 128 ] ; 

SliceC: :iterator D2_NODE = def inelterator ( SI , KnotenNrD2); 

KnotenNrl = D2_NODE->fi rst . getKnotenNummer (} ; 

LineNrl = D2__NODE->f irst . getLineNr ( ) ; 

sprintf (NodeTextl, "Op%d", KnotenNrl ) ; 

// sprint f (Bemerkungl, "Line %d", LineNrl ) ; 

strcpy (Bemerkungl, D2_NODE->f irst. getCodeLine{ ) ) ; 

uwgknotenC hknotenl ( CAUSE, KnotenNrl , NodeTextl , Bemerkungl ) ; 

posl = insert (hknotenl ) ; 

verbindeEcken (posOR_D2 , posl , 0 ) ; 

SliceC: :Nachfolger: : iterator BEGIN1 = D2_NODE->second . begin {) ; 
SliceC: :Nachfolger: : iterator END1 = D2_NODE->second . end ( ) ; 
while (BEGIN1 != END1 ) { 

if (BEGINl->second == DFK) { 

helpNrl = BEGINl-> first; 

KnotenNrl = SI [ helpNrl ]. fi rst . getKnotenNummer () ; 

LineNrl = SI [ helpNrl ]. fi rst . getLineNr () ; 

sprintf (NodeTextl, "Op%d" , KnotenNrl ) ; 

//sprintf (Bemerkungl, "Line %d n , LineNrl ) ; 

strcpy (Bemerkungl, SI (helpNrl) . f i rst . getCodeLine ( ) ) ; 

uwgknotenC hknoten2 ( CAUSE, KnotenNrl , NodeTextl , Bemerkungl ) ; 

pos2 = insert (hknoten2 ) ; 

verbindeEcken (posOR_D2,pos2, 0 ) ; 

SliceC: :Nachfolger: iterator BEGIN2 = SI [ helpNrl ]. second. begin () ; 
SliceC: rNachfolger: : iterator END2 = SI (helpNrl ]. second . end () ; 
while (BEGIN2 != END2 ) { 

helpNr2 = BEGIN2->f i rst ; 

if ( (BEGIN2->second == DFK) && 
(SI (helpNr2) . first .getKnotenNummer ( } != KnotenNrD2)) { 

//SliceC: : iterator SLNODE1 = def ineltera- 
tor ( SI r KnotenNrl ) ; 

//bui ldIn_D2_Part ( SI , posOR, SLPUSE, SLNODE1 , KnotenNrD2 ) 
BEGIN2++; 

} 

BEGIN1++; 

} 

SliceC: : iterator USEinD2 = f ind_Dl_Node ( SI , SLPUSE, SLNODE); 
SliceC: : iterator HELP = USEinD2; 

if (USEinD2->first.getLevel { ) > SLPUSE->f irst . getLevel ( } ) { 
USEinD2KnotenNr * USEinD2->fi rst . getKnotenNummer () ; 
KnotenNrD2Ret - f indD2Node ( SI , USEinD2); 
if (KnotenNrD2Ret == USEinD2KnotenNr } { 

switch (USEinD2->f irst . getKFGNodeType ( } } { 
case IFC: 

HELP = find_Dl_Node ( SI, USEinD2, SLNODE ) ; 
//ret = buildlnlfTree ( SI , USEinD2 , HELP, posOR ) ; 
ret = buildD2InIfTree(Sl,USEinD2,HELP,posOR D2 ) ; 
break; 
case LC: 

HELP = find_Dl_Node (SI, USEinD2, SLNODE ) ; 
buildlnLoopTree (SI, posOR_D2 , USEinD2 , SLNODE) ; 
break; 
default : 

cout << "Uups ! ! ! " « endl; 

} 

} 

} 

} 



int uwggraphC: : findD2Node (SliceC & SI, SliceC: : iterator PUSE) { 
int dummy = 0; 
int helpNrl = 0; 
int helpNr2 = 0; 

int KnotenNrReturn = PUSE->fi rst . getKnotenNummer () ; 
int PUSEKnotenNr = PUSE->fi rst . getKnotenNummer {) ; 
SliceC: :Nachfclger: : iterator BEGIN1 = PUSE->second . begin 
SliceC: :Nachfclger: : iterator END1 = PUSE->second . end ( ) ; 
while ( (BEGIN1 != END1 ) && (dummy != 1)J { 
if (BEGINl->second == DFK) { 

helpNrl = BEGINl->f i rst ; 
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tenNr] { 

Si [helpNr2 ] . first . getKnotenNummer ( ) ; 

} 



75 

SliceC: rNachfolger: : iterator BEGIN2 = SI [helpNrl ]. second. begin () ; 
SliceC: :Nachfolger: :iterator END2 = SI [ helpNrl ). second. end () ; 
while ( (BEGIN2 != END2 ) && (dummy !*= 1)){ 
if (BEGIN2->second « KFK) { 

helpNr2 = BEGIN2-> first; 

if (SI [helpNr2J . first. getKnotenNummer { ) ~ PUSEKno- 



BEGIN2+-* 



} 

BEGIN1++; 



KnotenNrReturn 
dummy = 1; 



return KnotenNrReturn; 



int uwggraphC: :buildIn_LoopKF_ANDPart (SliceC & SI, int posAND_KF, SliceC: : iterator SLPUSE) 

int pos = 0; 
int helpNrl = 0; 
int helpNr2 = 0; 
int RefPUse = 0; 
int KnotenNr = 0; 
int LineNr = 0; 
int dummy = 0; 
int dummy 1 = 0; 
char Bemerkung [ 1000 J ; 
char NodeText [128] ; 

RefPUse = SLPUSE->f i rst . getKnotenNummer () ; 

SliceC: :Nachfolger: : iterator BEGIN = SLPUSE->second . begin {} ; 
SliceC: rNachfolger: : iterator END = SLPUSE->second . end { ) ; 
while ((BEGIN != END) && (dummyl != 1)) { 
if ( BEGIN- >second == DFK) { 

helpNrl = BEGIN-> first; 

SliceC: :Nachfclger: : iterator BEGIN2 - SI f helpNrl ] . second .begin ( ) ; 
SliceC: rNachfolger: riterator END2 = SI f helpNrl ) . second . end ( ) ; 
while ( (BEGIN2 != END2 ) && (dummy != 1)) { 
if (BEGIN2->second == KFK) { 

helpNr2 = BEGIN2->f i rst; 

if (SI [helpNr2] . first . getKnotenNummer ( ) == RefPUse) { 
KnotenNr = SI ( helpNrl ]. fi rst . getKnotenNummer ( ) 
LineNr = SI [ helpNrl ] . first. getLineNr ( ) ; 
sprintf {NodeText, "Op%d" , KnotenNr ) ; 
//sprintf (Bemerkung, "Line %d M , LineNr ) ; 

strcpy (Bemerkung, SI [helpNrl] . f i rst . getCodeLine ( ) ) ; 

uwgknotenC hkno- 

ten (CAUSE, KnotenNr , NodeText , Bemerkung ) ; 

pos «= insert (hknoten) ; 
verbindeEcken ( posAND_KF, pos , 0) ; 
dummy = 1; 
dummyl = 1; 

} 

} 

BEGIN2++; 



} 

} 

BEGIN++; 

} 

return KnotenNr; 



void uwggraphC: :buildIn_LoopKF_ORPart (SliceC & SI, int posLOOP KF, SliceC- -ir e r 
int KnotenNrD2) { _ •* - ■ 

int posl = 0; 

int pos2 = 0; 

int helpNrl = 0; 

int helpNr2 = 0; 

int KnotenNr = 0; 

int KnotenNrl = 0; 

int LineNr = 0; 



GR 99 P 1974 



76 

int LineNrl = 0; 
char NodeText [128] ; 
char Bemerkung [ 1000) ; 

KnotenNr = SL1 ->f irst . getKnotenNummer ( ) ; 

LineNr SLl->f irst . getLineNr ( ) ; 

sprintf (NodeText, "Op%d" , KnotenNr ) ; 

/ /sprintf (Bemerkung, "Line %d", LineNr) ; 

st rcpy( Bemerkung, SLl->f irst .getCodeLine ( ) ) ; 

uwgknotenC hknotenl { CAUSE, KnotenNr, NodeText, Bemerkung ) ; 

posl = insert (hknotenl ) ; 

verbindeEcken {posLOOP_KF, posl, 0) ; 

Sliced :Nachfolger: : iterator BEGIN = SLl->second. begin () ; 
Sliced :Nachfolger: : iterator END = SLl->second . end ( ) ; 
while (BEGIN END) { 

if (BEGIN->second == DFK) { 

helpNrl = BEGIN->f i rst ; 

KnotenNrl = SI [ helpNrl ] . first . getKnotenNummer ( ) ; 
if (KnotenNrl != KnotenNrD2) { 

LineNrl = SI I helpNrl ] . first . getLineNr ( ) ; 

sprintf (NodeText, "Op%d" , KnotenNrl ) ; 

//sprintf (Bemerkung, "Line %d", LineNrl ) ; 

strcpy (Bemerkung, SLl->f irst. getCodeLine ( ) ) ; 

uwgknotenC hknotenl (CAUSE, KnotenNrl, NodeText , Bemerkung ) ; 
posl = insert (hknotenl ) ; 
verbindeEcken (posLOOP_KF, posl, 0) ; 

SliceC: : iterator NEXTNODE = def inelterator ( SI , KnotenNrl ) ; 
SliceC: :Nachfolger: : iterator BEGIN2 = NEXTNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END2 = NEXTNODE->second . end ( ) ; 
while (BEGIN2 != END2 ) { 

if (BEGIN2->second == DFK) { 

helpNr2 = BEGIN2->f irst ; 

if (NEXTNODE->f irst . getKnotenNummer { ) != KnotenNrD2) { 
buildln LoopKF ORParttSl, posLOOP KF, NEXTNODE, 
KnotenNrD2); ~ ~ 

i 

/ 

} 

BEGIN2++; 

} 

} 

BEGIN++; 

} 



void uwggraphC: : addAUDlNodes ( SliceC & SI, SliceC: : iterator SLNODE, int p OS Gatt< 
D2_RefNr) { 

int posl =0; 

int ret = 0; 

int checkNr = 1; 

int helpNrl = 0; 

int helpNr2 = 0; 

int SliceNr2 = 0; 

int KnotenNrO = 0; 

int KnotenNrl = 0; 

int KnotenNr2 = 0; 

int LineNrl = 0; 

int LineNrO - 0; 

char Bemerkungl [ 1000] ; 

char NodeTextl [ 128] ; 

KnotenNrO = SLNODE->fi rst . getKnotenNummer () ; 
LineNrO = SLNODE->fi rst . getLineNr () ; 
sprintf (NodeTextl, "Op%d M , KnotenNrO ) ; 
//sprintf (Bemerkungl, "Line %d" , LineNrO ) ; 
strcpy (Bemerkungl, SLNODE->f irst .getCodeLine ( ) ) ; 
uwgknotenC hknotenl ( CAUSE, KnotenNrO, NodeTextl , Bemerkungl ) ; 
posl = insert ( hknotenl ) ; 
verbindeEcken (posGatter, posl , 0) ; 

SliceC: :Nachfolger: : iterator BEGIN1 = SLNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END1 = SLNODE->second . end ( ) ; 
while (BEGIN1 != END1 ) { 

if (BEGINl->second DFK) { 

helpNrl = BEGINl->f i rst ; 

KnotenNrl = SI [helpNrl J . first . getKnotenNummer () ; 
SLNODE = def inelterator (SI, KnotenNrl ) ; 

if ((KnotenNrl != D2_RefNr) && (KnotenNrl != KnotenNrO)} { 
SliceC: :Nachfolger: : iterator BEGIN2 = 

SI [ helpNrl ]. second . begin () ; 
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se(Sl,HELPPUSE) ; 
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SliceC: :Nachfolger: : iterator END2 = SI ( helpNrl ]. second . end () ; 
while (BEGIN2 != END2 ) { 

if (BEGIN2->second == KFK} { 

helpNr2 = BEGIN2->f i rst ; 

SliceNr2 = SI [ helpNr2 ] . f i rst . getKnotenNummer ( } ; 
SliceC: : iterator HELPPUSE = def inelterator ( SI , 

checkNr = checkUWGNode ( SliceNr2 ) ; 
if (checkNr == 0) { 

SliceC: : iterator HELP1 = f indOutmost PU- 

switch (HELPl->f irst . getKFGNodeType ( ) ) 



HELPPUSE, SLNODE); 



Tree ( SI , HELPPUSE, SLNODE, posGatter ) ; 



endl ; 



case LC: 

buildlnLoopTree { SI, posGatter, 

break; 
case IFC: 

ret = buildlnlf- 



break; 



default: 



cout « "Falscher Weg! " « 



} 



} 

BEGIN2++; 



if {checkNr ==1) { 

LineNrl = SI [ helpNrl ] . fi rst . getLineNr ( ) ; 
sprintf {NodeTextl , **Op%d" , KnotenNrl ) ; 
//sprintf (Bemerkungl , "Line %d", LineNrl ) ; 
strcpy(Bemerkungl, SI (helpNrl] . f i rst . getCodeLine ( ) ) ; 
uwgknotenC hkno- 
ten2 (CAUSE, KnotenNrl, NodeTextl, Bemerkungl ) ; 

posl = insert (hknoten2 } ; 
verbindeEcken ( posGatter , posl , 0 ) ; 
addAUDlNodes ( SI , SLNODE, posGatter , D2_RefNr) ; 



} 

} 

BEGIN1++; 



} 



int uwggraphC: :buildD2InIfTree (SliceC & SI, SliceC: : iterator SLIF, Sli ceC: : iterator SLORIG, 
int posl) { ' 

int pos2 = 0; 

int posl FOR = 0; 

int posIFDFOR = 0; 

int posIFKFOR = 0; 

int posIFDFORA2 = 0; 

char NodeText [ 128 ] ; 

char Bemerkung [ 1000] ; 

int KnotenNr = SLIF->fi rst . getKnotenNummer {) ; 
int LineNr = SLIF->f irst . getLineNr () ; 
sprintf (NodeText, "Verzweigung_D+ (%d) KnotenNr) ; 
strcpy (Bemerkung, SLIF->f irst . getCodeLine ( ) ) ; 
uwgknotenC hknotenl (OR, NodeText, Bemerkung ) ; 
pos2 = insert (hknotenl ) ; 
posl FOR = size { ) - 1; 
verbindeEcken (posl , pos2,0); 

sprintf (NodeText, "Verzweigung_KF_D+ (%d) LineNr ) ; 
uwgknotenC hknotenS ( OR, NodeText ) ; 
posIFKFOR = insert (hknotenS) ; 
verbindeEcken (pos2, posIFKFOR, 0) ; 
buildD2_IFKF_Part (SI, posIFKFOR, SLIF); 
switch (SLORIG->f irst . getKnotenldent ( ) ) { 
case THEN: 
{ 

sprintf (NodeText, "Verzweigung_DF_Alt . 1_D+ (%d) LineNr ) ; 

uwgknotenC hknoten2 (AND, NodeText ) ; 

insert ( hknotenl , hknoten2, 0) ; 

sprintf (Bemerkung, "Alt . 1_D+ (%d) *', LineNr) ; 

sprintf (NodeText, "Alt . 1_D+ ( %d) LineNr ) ; 

uwgknotenC hknoten3 (CAUSE, NodeText , Bemerkung ) ; 
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insert (hknoten2, hknoten3, 0) ; 

sprintf (NodeText, "Alt . 1_D+ { %d ) " , LineNr ) ; 

uwgknotenC hknoten4 ( OR, NodeText ) ; 

insert ( hknoten2, hknoten4 , 0) ; 

posIFDFOR = sized - 1; 

buildD2_Al_Part (SI, posIFDFOR, SLIF, SLORIG) ; 

} 

break; 
case ELSE: 

{ 

sprint f (NodeText, "Verzweigung_DF_Alt . 2_D+ { %d } " , LineNr ) ; 

uwgknotenC hknoten2 ( AND, NodeText ) ; 

insert ( hknotenl , hknoten2 , 0) ; 

sprintf (Bemerkung, "Alt . 2_D+ ( %d ) ", LineNr ) ; 

sprint f ( NodeText, "Al t . 2_D+ ( %d ) " , LineNr ) ; 

uwgknotenC hknoten3 ( CAUSE, NodeText, Bemerkung ) ; 

insert {hknoten2 , hknoten3, 0) ; 

sprintf (NodeText, "Alt . 2_D+ ( %d )", LineNr ) ; 

uwgknotenC hknoten4 ( OR, NodeText ) ; 

insert (hknoten2 , hknoten4 , 0) ; 

posIFDFORA2 = size() - 1; 

buildD2_Al_Part (SI, posIFDFORA2, SLIF, SLORIG) ; 

} 

break; 
default: 

cout « "AutschM!" « endl; 

} 

return posIFDFOR; 



void uwggraphC: :buildD2_Al_Part (SliceC & SI, int posIFDFOR_D2, SliceC: : iterator SLIF, S 
ceC: : iterator SLNODE) { 

int pos0_Al = 0; 

int posl_Al = 0; 

int helpNrO = 0; 

int helpNrl = 0; 

int KnotenNrO = 0; 

int KnotenNrl = 0; 

int KnotenNr2 = 0; 

int LineNrO = 0; 

int LineNrl = 0; 

char NodeTextO [ 128 ] ; 

char BemerkungO ( 1000) ; 

KnotenNrO = SLNODE->f i rst . getKnotenNummer ( ) ; 
LineNrO = SLNODE->f irst . getLineNr ( ) ; 
sprintf (NodeTextO, "Op%d" , KnotenNrO ) ; 
//sprintf (BemerkungO, "Line %d" , LineNrO) ; 
strcpy (BemerkungO, SLNODE->f i rst . getCodeLine ( ) ) ; 
uwgknotenC h knot en 0 ( CAUSE , KnotenNrO , NodeTextO , BemerkungO ) ; 
pos0_Al = insert (hknotenO) ; 
verbindeEcken(posIFDFOR_D2,posO_Al, 0) ; 

SliceC: :Nachfolger: :iterator BEGIN0 = SLNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END0 = SLNODE->second . end ( ) ; 
while (BEGIN0 != END0) { 

helpNrO = BEGIN0->f irst ; 

KnotenNrl = SI ( helpNrO] . first . getKnotenNummer () ; 
if (KnotenNrl > KnotenNrO) { 

LineNrl = SI [ helpNrO ]. fi rst . get LineNr (} ; 

sprintf (NodeTextO, "Op%d" , KnotenNrl ) ; 

//sprintf (BemerkungO, "Line %d M , LineNrl ) ; 

strcpy (BemerkungO, SI [helpNrO] . fi rst . getCodeLine ( ) ) ; 

uwgknotenC hknotenl ( CAUSE, KnotenNrl f NodeText 0, BemerkungO) ; 

posl_Al ~ insert (hknotenl ) ; 

verbindeEcken ( posl FDFOR_D2 , posl_Al , 0) ; 

SliceC: :Nachfolger: .-iterator BEG INI = SI ( helpNrO ] . second . begin ( ) ; 
SliceC: :Nachfolger: :iterator END1 = SI [ helpNrO ]. second . end () ; 
while (BEGIN1 END1 ) { 

if (BEGINl->second == DFK) { 

helpNrl = BEGINl->f i rst ; 

KnotenNr2 = SI [ helpN r 1 ] . f i rst . getKnot enNumme r ( ) ; 
if (KnotenNrl != KnotenNr2 ) { 

, , SliceC: riterator SLNODE = defineltera- 

tor (SI, KnotenNr2 ) ; 

SLNODE ) buildD2_Al_Part (SI, posl FDFOR_D2, SLIF, 



GR 99 P 1974 



79 

BEGIN1++; 

} 

} 

BEGINO++; 

} 



void uwggraphC: : buildD2_IFKF_Part (SliceC & SI, int posKFOR_D2, SliceC: : iterator SLPUSE) 



int 


posO_D2 = 


0; 




int 


posl D2 = 


0; 




int 


ret « 0; 






int 


dummy = 0; 




int 


helpNrO = 


0; 




int 


helpNrl = 


0; 




int 


helpNr2 = 


0; 




int 


checkPUse 




0 


int 


checkNode 




0 


int 


KnotenNrO 




0 


int 


KnotenNrl 




0 


int 


KnotenNr2 




0 


int 


KnotenNr3 




0 


int 


LineNrO = 


0; 




int 


LineNrl = 


0; 





char NodeTextO [ 128 ] ; 
char BemerkungO [ 1000] ; 

KnotenNrO = SLPUSE->f i rst . getKnotenNummer ( } ; 
LineNrO = SLPUSE->f irst . getLineNr { ) ; 
sprintf (NodeTextO, t, Op%d" , KnotenNrO ) ; 
//sprintf (BemerkungO, "Line %d", LineNrO) ; 
strcpy ( BemerkungO, SLPUSE->f i rst . getCodeLine ( ) ) ; 
uwgknotenC hknotenO ( CAUSE, KnotenNrO, NodeTextO, BemerkungO ) ; 
posO_D2 = insert (hknotenO) ; 
verbindeEcken (posKFOR_D2 , posO_D2 , 0) ; 

SliceC: :Nachfolger :: iterator BEGINO = SLPUSE->second . begin () ; 
SliceC: :Nachfolger: : iterator ENDO = SLPUSE->second . end ( ) ; 
while (BEGINO != ENDO) { 

helpNrO = BEGIN0->f i rst ; 

KnotenNrl = SI ( helpNrO ]. fi rst . getKnotenNummer () ; 
SliceC: : iterator SLNODE = def inelterator ( SI , KnotenNrl ) ; 
if (KnotenNrl > KnotenNrO) { 

LineNrl = SI [ helpNrO }. fi rst . getLineNr () ; 

sprintf (NodeTextO, "Op%d" , KnotenNrl ) ; 

//sprintf ( BemerkungO, "Line %d", LineNrl ) ; 

strcpy (BemerkungO, SI [helpNrO] . first . getCodeLine ( ) ) ; 

uwgknotenC hknotenl (CAUSE, KnotenNrl , NodeTextO, BemerkungO ) ; 

posl_D2 = insert (hknotenl ) ; 

verbindeEcken ( posKFOR_D2 , pes 1_D2 , 0) ; 

SliceC: :Nachfolger: : iterator BEGIN1 = SLNODE->second . begin () ; 
SliceC: :Nachfolger: : iterator END1 = SLNODE->second . end ( ) ; 
while (BEGIN1 != END1 ) { 

if (BEGINl->second == DFK) { 

helpNrl = BEGINl->f i rst; 

KnotenNr2 = SI [ helpNrl ] . first . getKnotenNummer ( ) ; 
if (KnotenNr2 != KnotenNrl) { 

SliceC: : iterator SLNODE = defineltera- 



tcr (Sl,KnotenNr2) ; 
SI [ helpNrl ] - second -begin ( ) ; 
SI [helpNrl ] .second. end ( ) ; 

SI [helpNr2] . first . getKnotenNummer ( ) ; 
def inelterator (SI , KnotenNr3 ) ; 
>f irst . getKnotenNummer ( ) > KnotenNr3) 
sesl ( SI , SLPUSE, HELP FUSE ) ; 



SliceC: :Nachfolger: : iterator BEGIN2 = 

SliceC: :Nachfolger: : iterator END2 = 

while (BEGIN2 != END2 ) { 

if (BEGIN2->second == KFK) { 

helpNr2 = BEGIN2->f i rst; 
KnotenNr3 = 

SliceC: : iterator HELPPUSE = 



if (SLPUSE- 



checkPUse 



checkPU- 



ses2 ( SI , SLPUSE, HELPPUSE ) ; 



else 



checkPUse = checkPU- 
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WGNode ( KnotenNr2 ) ; 

dOutmost PUse ( SI , HELPPUSE ) ; 
>f irst . getKFGNodeType ( ) ) { 

buildlnLoopTree (SI, posKFOR_D2, HELPPUSE, SLNODE ) i 
buildlnlfTree [SI, HELPPUSE, SLNODE, posKFOR_D2); 
"Falscher Weg in Al ! " « endl; 



checkNode = checkU- 

if (checkNode ==0) { 

if (checkPUse ~= 0) { 

//HELPPUSE = fin 

switch (HELPPUSE 

case LC: 



dummy = 1 
break; 
case IFC: 

ret - 



dummy = 1 
break; 



default: 



else { 



SI [helpNr2] . f i rst . getLineNr ( ) ; 

sprintf (NodeTextO, "Op%d" , KnotenNr2 ) ; 

//sprintf (BemerkungO, "Line %d n , LineNrl ) ; 

strcpy (BemerkungO, SI [helpNr2] ♦ first . getCodeLine ( ) ) ; 
tenl ( CAUSE , KnotenNr2 , NodeTextO, BemerkungO J ; 
insert (hknotenl ) ; 

verbindeEcken (posKFOR_D2 , posl D2, 0) ; 



LineNrl = 



uwgknotenC hkno- 
posl D2 = 



} 

BEGIN2++; 



BEGIN1++; 



BEGIN0++; 



SliceC: : iterator uwggraphC : : f indOutmost PUse ( SI iceC & SI, SliceC: : iterator SLPUSE) { 
int dummy = 0; 
int helpNrl = 0; 
int checkNr = 0; 
int KnotenNrl = 0; 

SliceC: : iterator RETURN = SLPUSE; 

SliceC: :Nachfolger: : iterator BEGIN1 = SLPUSE->second . begin () ; 
SliceC: :Nachfolger: : iterator END1 = SLPUSE->second . end ( ) ; 
while ( (BEGIN1 != END1 ) && (dummy != 1)){ 
if (BEGINl->second == KFK) { 

helpNrl = BEGINl->f irst; 

KnotenNrl = SI [ helpNrl ) . first. getKnotenNummer ( ) ; 
checkNr = checkUWGNode ( KnotenNrl ) ; 
if (checkNr == 0) { 

SLPUSE = def inelterator (SI , KnotenNrl ) ; 

RETURN = f indOutmost PUse (SI, SLPUSE); 

dummy = 1; 

} 

else { 

RETURN = SLPUSE; 
dummy = 1 ; 

} 

} 

BEGIN1++; 

} 
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return RETURN; 

} 



int uwggraphC: : checkUWGNode { int SliceNr) { 
int dummy = 0; 

uwggraphC: : iterator ITER = begin () ; 
while (ITER != end ( ) ) { 

if (( *ITER) . first . getCauseNr ( ) == SliceNr) { 
dummy = 1; 

} 

ITER++; 

} 

i f { dummy =— 1 ) 
return 1; 

else 

return 0; 

} 



SliceC: : iterator uwggraphC: : def inelterator ( SliceC & SI, int SliceNr) { 
int dummy = 0; 

SliceC: : iterator ITER = Sl.begin(); 
SliceC: : iterator HELP = Sl-begint); 
while {(ITER != Sl.end(J) && (dummy != 1)) { 

if ( (*ITER) . first. getKnotenNummer ( ) « SliceNr) { 

HELP = ITER; 

dummy =1; 

) 

ITER++; 

} 

return HELP; 



void uwggraphC: : SliceAusgeben (SliceC & SI) { 
//int a; 

ofstream Ziel ( "Slice . sic" ) ; 

ostream_iterator<KFGListNodeC> POSIT (Ziel, " KnotenNn" ) ; 
ostream_iterator<KFGListNodeC> POSIT2(Ziel, " Nachfolger: 
ostream_iterator<GraphKanteC> KANTEIT { Zi el , "\n"); 
Ziel « "SLICE:" « endl « endl; 
for (int i = 0; i < Sl.sizeO; ++i) { 
Ziel « Sl[i]. first « " <"; 

SliceC: :Nachfolger: : iterator IT = SI [ i ]. second . begin () ; 
SliceC: :Nachfolger: : iterator ITEND = SI [ i ]. second . end () ; 
while (IT != ITEND) { 

Ziel « SI [ ( * IT ) .first] . first « ■ • // Ecke 

« endl « "Kante:" « (*IT). second « • '; // Kantenw 

+ + IT; 

} 

Ziel « ">\n"; 

} 

} 



#include "uwgkante . h" 
□ 

#include <iostream> 
□ 

□ 

ostream& operator « ( ostrearas os, const uwgkanteC& Node) { 
os « Node. Number « endl ; 

□ 

return os; 

□ 

} 
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^include "uwgknoten . h" 

□ 

^include <iostream> 
□ 

0 

ostreams operator « ( ostreami os, const uwgknotenCfi Node ) { 

//os « Node.Gatterldent « M " « Node.CauseNr « w " « Node . gattertext « endl 

//return os; 

if (Node.getNodeldent ( ) == EFFECT ) { 

os « n %%EFFEC f T:\ nn « Node . gatterbemerkung « «\» : \«« « Node . gattertext « 
"\"," « Node.Gatterldent « ",,/Q; n « endl; 
return os; 

} 

else if {Node . getNodeldent ( ) == OR ) { 

os « "%%OR:l:\" w « Node . gattertext « »\» r VkeineV, " « Node.Gatterldent 
« ,/0;" « endl; 

return os; 

} 

else if (Node.getNodeldent ( ) AND) { 

os « "%%AND:\"" « Node. gattertext « «\ » : \ "keine\ « , » « Node.Gatterldent 
« ,/0; " « endl; 

return os; 

} 

else if (Node.getNodeldent ( ) == NOT ) { 

os « "%%NOT:\"» « Node. gattertext « »\ » ; \ » keine\ « , » « Node . Ga tt erldent 
« ",,/0;" « endl; 

return os; 

} 

/*else if (Node.getNodeldent ( J == CAUSE) { 

os « "%%CAUSE:\"" « Node . gattertext « "\" : \ "keine\ - , » « Node.Gatterldent 
« ", f /0;" « endl; 

return os; 

}*/ 

else if (Node . getNodeldent ( ) == CAUSE) { 

os « M %%CAUSE : \ " *' « Node .gatterbemerkung << "\ M :\»" « Node aatt«rtext « 
"\"," « Node.Gatterldent « ",,/0;" « endl; " 
return os; 

} 

else f 

os « Node.Gatterldent « " « « Node.CauseNr « « " « Node . aattertext 

<< endl ; 

return os; 

} 



int uwgknotenC: : DummyNr = 1; 
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Patentanspruche 

1. Verfahren zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogramms, durch einen 
Computer, 

• bei dem zumindest der Teil des Computerprogramms gespei- 
chert 1st, 

• bei dem eine Kontrollf lufibeschreibung und eine Datenf lufibe- 
schreibung fur den Teil des Computerprogramms ermittelt 
werden, 

• bei dem Programmelemente aus dem Teil des Computerprogramms 
ausgewahlt werden, 

• bei dem fur jedes ausgewahlte Programme lement unter Verwen- 
dung einer gespeicherten Fehlerbeschreibung, die jeweils 
einem Ref erenzelement zugeordnet ist, eine Elementenf ehler- 
beschreibung ermittelt wird, mit der mogliche Fehler des 
jeweiligen Programmelements beschrieben werden, 

• bei dem mit einer Fehlerbeschreibung eines Ref erenzelements 
mogliche Fehler des jeweiligen Ref erenzelements beschrieben 
werden, und 

• bei dem aus den Elementenf ehlerbeschreibungen die Ge- 
samtf ehlerbeschreibung unter Berucksichtigung der Kontroll- 
flufibeschreibung und der Datenf lufibeschreibung ermittelt 
wird . 

2. Verfahren nach Anspruch 1, 

bei dem die Kontrollf lufibeschreibung in Form eines Kontroll- 
flufigraphen vorliegt. 

3. Verfahren nach Anspruch 1 oder 2, 

bei dem die Datenf lufibeschreibung in Form eines Datenf lufigra- 
phen vorliegt, 

4. Verfahren nach einem der vorangegangenen Anspruche, 

• bei dem die Fehlerbeschreibung in Form eines gespeicherten 
Fehlerbaums vorliegt , 
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• bei dem die Elementenf ehlerbeschreibung als Elementenf eh- 
lerbaum ermittelt wird, und 

• bei dem die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum 
ermittelt wird. 

5. Verfahren nach einem der vorangegangenen Anspriiche, 
eingesetzt zur Fehleranalyse des Teils des Computerprogramms. 

6. Verfahren nach einem der vorangegangenen Anspriiche, 

• bei dem die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum 
ermittelt wird, 

• bei dem der Gesamtf ehlerbaum verandert wird hinsichtlich 
vorgebbarer Rahmenbedingungen* 

7. Verfahren nach Anspruch 6, 

bei dem die Veranderung durch Hinzufugen eines Erganzungsf eh- 
lerbaums erfolgt. 

8. Anordnung zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogramms, durch einen 
Computer, 

mit einem Prozessor, der derart eingerichtet ist, dafi folgen- 
de Schritte durchfuhrbar sind: 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• eine Kontrollf lufibeschreibung und eine Datenf lufibeschrei- 
bung werden fur den Teil des Computerprogramms ermittelt, 

• Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt, 

• fur jedes ausgewahlte Programmelement wird unter Verwendung 
einer gespeicherten Fehlerbeschreibung, die jeweils einem 
Referenzelement zugeordnet ist, eine Elementenf ehlerbe- 
schreibung ermittelt, mit der mogliche Fehler des jeweili- 
gen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 
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• aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
lerbeschreibung unter Beriicksichtigung der Kontrollf lufibe- 
schreibung und der Datenf lufibeschreibung ermittelt. 

9. Anordnung nach Anspruch 8, 

bei der der Prozessor derart eingerichtet ist, dali die Kon- 
trollf luflbeschreibung in Form eines Kontrollf luligraphen vor- 
liegt . 

10. Anordnung nach Anspruch 8 oder 9, 

bei der der Prozessor derart eingerichtet ist, dafi die Daten- 
f lulibeschreibung in Form eines Datenf lufigraphen vorliegt. 

11. Anordnung nach einem der Anspruche 8 bis 10, 
bei der der Prozessor derart eingerichtet ist, dafi 

• die Fehlerbeschreibung in Form eines gespeicherten Fehler- 
baums vorliegt, 

• die Elementenf ehlerbeschreibung als Elementenf ehlerbaum er- 
mittelt wird, und 

• die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum ermittelt 
wird. 

12. Anordnung nach einem der Anspruche 8 bis 11, 
eingesetzt zur Fehleranalyse des Teils des Computerprogramms . 

13. Anordnung nach einem der Anspruche 8 bis 12, 
bei der der Prozessor derart eingerichtet ist, daft 

• die Gesamtf ehlerbeschreibung als Gesamtf ehlerbaum ermittelt 
wird, 

• der Gesamtf ehlerbaum verandert wird hinsichtlich vorgebba- 
rer Rahmenbedingungen . 

14. Anordnung nach Anspruch 13, 

bei der der Prozessor derart eingerichtet ist, dali die Veran- 
derung durch Hinzufugen eines Erganzungsf ehlerbaums erfolgt. 
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15, Computerprogramm-Erzeugnis, das ein computerlesbares 
Speichermedium umfafit, auf dem ein Programm gespeichert ist, 
das es einem Computer ermoglicht, nachdem es in einen Spei- 
cher des Computers geladen worden ist, folgende Schritte 
durchzuftihren zur Ermittlung einer Gesamtf ehlerbeschreibung 
zumindest eines Teils eines Computerprogramms : 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• eine Kontrollf lufibeschreibung und eine Datenf lufibeschrei- 
bung werden fur den Teil des Computerprogramms ermittelt, 

• Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt, 

• fur jedes ausgewahlte Programmelement wird unter Verwendung 
einer gespeicherten Fehlerbeschreibung, die jeweils einem 
Ref erenzelement zugeordnet ist, eine Elementenf ehlerbe- 
schreibung ermittelt, mit der mogliche Fehler des jeweili- 
gen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 

• aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
lerbeschreibung unter Berucksichtigung der Kontrollf lufibe- 
schreibung und der Datenf lufibeschreibung ermittelt. 

16. Computerlesbares Speichermedium, auf dem ein Programm ge- 
speichert ist, das es einem Computer ermoglicht, nachdem es 
in einen Speicher des Computers geladen worden ist, folgende 
Schritte durchzuf uhren zur Ermittlung einer Gesamtf ehlerbe- 
schreibung zumindest eines Teils eines Computerprogramms: 

• zumindest der Teil des Computerprogramms ist gespeichert, 

• eine Kontrollf lufibeschreibung und eine Datenf lufibeschrei- 
bung werden fur den Teil des Computerprogramms ermittelt, 

• Programmelemente werden aus dem Teil des Computerprogramms 
ausgewahlt, 

• fur jedes ausgewahlte Programmelement wird unter Verwendung 
einer gespeicherten Fehlerbeschreibung, die jeweils einem 
Referenzelement zugeordnet ist, eine Elementenf ehlerbe- 
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schreibung ermittelt, mit der mogliche Fehler des jeweili- 
gen Programmelements beschrieben werden, 

• mit einer Fehlerbeschreibung eines Ref erenzelements werden 
mogliche Fehler des jeweiligen Ref erenzelements beschrie- 
ben, und 

• aus den Elementenf ehlerbeschreibungen wird die Gesamtfeh- 
lerbeschreibung unter Beriicksichtigung der Kontrollf lufibe- 
schreibung und der Datenf luJibeschreibung ermittelt. 
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Zusammenf assung 

Verfahren und Anordnung zur Ermittlung einer Gesamtf ehlerbe- 
schreibung zumindest eines Tells eines Computerprogramms so- 
5 wie Computerprograiran-Erzeugnis und computerlesbares Speicher- 
xnedium 

Aus dem Teil des Computerprogramms werden eine Kontrollf lufi- 
beschreibung und eine Datenf luBbeschreibung ermittelt und es 

10 werden Programmelemente aus dem Teil des Computerprogramms 

ausgewahlt. Fur jedes ausgewahlte Programmelement wird unter 
Verwendung einer gespeicherten Fehlerbeschreibung die jeweils 
einem Ref erenzelement zugeordnet ist, eine Elementenf ehlerbe- 
schreibung ermittelt , mit der mogliche Fehler des jeweiligen 

15 Programmelements beschrieben werden. Aus den Elementenf ehler- 
beschreibungen wird die Gesamtf ehlerbeschreibung unter Be- 
rucksichtigung der Kontrollf luBbeschreibung und der Daten- 
f luBbeschreibung ermittelt . 



20 



Figur 2 



